view src/indyvon/component.clj @ 0:43e3358ca4d9

Initial.
author Mikhail Kryshen <mikhail@kryshen.net>
date Sun, 06 Jun 2010 06:03:38 +0400
parents
children 0771180bf7c2
line wrap: on
line source

;; (ns indyvon.component
;;   (:use indyvon.layer)
;;   (:import (java.awt Graphics Graphics2D))
;;   (:gen-class
;;    :name indyvon.Component
;;    :extends java.awt.Component
;;    :constructor {[Layer] []}
;;    :state layer
;;    :init init-state))

;; (defn- init-state [layer]
;;   [[] layer])

;; (defn -paint [this graphics])

;; (defn -update [this graphics]
;;      (-paint this graphics))