define-ant-type

lancet

  • (define-ant-type clj-name ant-name)

0 Examples top

Log in to add / edit an example.

See Also top

Log in to add a see also.

Plus_12x12 Minus_12x12 Source lancet.clj:105 top

(defmacro define-ant-type [clj-name ant-name]
  `(defn ~clj-name [props#]
     (let [bean# (new ~ant-name)]
       (set-properties! bean# props#)
       (when (property-descriptor bean# "project")
         (set-property! bean# "project" ant-project))
       bean#)))
Vars in lancet/define-ant-type: defmacro apply concat defn let list seq vector when
Used in 0 other vars

Comments top

No comments for define-ant-type. Log in to add a comment.