Mercurial > cortex

comparison org/skin.org @ 69:39e4e1542e4a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
updated test-suite
author Robert McIntyre <rlm@mit.edu>
date Fri, 09 Dec 2011 23:11:28 -0600
parents 6cd5a034d855
children e8df6e76c3e5
comparison
equal deleted inserted replaced
68:6cd5a034d855 69:39e4e1542e4a
226 (-> (.getMaterial) 226 (-> (.getMaterial)
227 (.getAdditionalRenderState) 227 (.getAdditionalRenderState)
228 (.setBlendMode RenderState$BlendMode/Alpha)) 228 (.setBlendMode RenderState$BlendMode/Alpha))
229 (.setQueueBucket RenderQueue$Bucket/Transparent))) 229 (.setQueueBucket RenderQueue$Bucket/Transparent)))
230 230
231 (defn test-skin [] 231 (defn test-skin
232 "Testing touch:
233 you should see a ball which responds to the table
234 and whatever balls hit it."
235 []
232 (let [b 236 (let [b
233 ;;(transparent-box) 237 ;;(transparent-box)
234 (transparent-sphere) 238 (transparent-sphere)
235 ;;(sphere) 239 ;;(sphere)
236 f (transparent-floor) 240 f (transparent-floor)