Mercurial > cortex
diff org/skin.org @ 58:25142dad240a
created test suite
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Sat, 19 Nov 2011 23:42:21 -0700 |
parents | 00d0e1639d4b |
children | 63951929fe44 |
line wrap: on
line diff
1.1 --- a/org/skin.org Wed Nov 16 02:42:50 2011 -0700 1.2 +++ b/org/skin.org Sat Nov 19 23:42:21 2011 -0700 1.3 @@ -227,10 +227,10 @@ 1.4 1.5 (defn test-skin [] 1.6 (let [b 1.7 - ;;(transparent-box) 1.8 - (transparent-sphere) 1.9 + ;;(transparent-box) 1.10 + (transparent-sphere) 1.11 ;;(sphere) 1.12 - f (transparent-floor) 1.13 + f (transparent-floor) 1.14 debug-node (Node.) 1.15 node (doto (Node.) (.attachChild b) (.attachChild f)) 1.16 root-node (doto (Node.) (.attachChild node) 1.17 @@ -247,8 +247,8 @@ 1.18 ;; (no-logging) 1.19 ;;(enable-debug world) 1.20 ;; (set-accuracy world (/ 1 60)) 1.21 - ) 1.22 - 1.23 + ) 1.24 + 1.25 (fn [& _] 1.26 (let [sensitivity 0.2 1.27 touch-data (touch-percieve sensitivity b node)]