Add internal namespace for physics

This commit is contained in:
oakes
2014-04-19 19:12:31 -04:00
parent ab1936c84b
commit b7967992c6
2 changed files with 181 additions and 2 deletions

View File

@@ -17,7 +17,7 @@
btSoftRigidDynamicsWorld]
[play_clj.g3d_physics ContactListener3D]))
(def ^:private init (delay (Bullet/init)))
(def init-bullet (delay (Bullet/init)))
(defrecord World3D [object])
(defrecord Body3D [object])
@@ -50,7 +50,7 @@
(defn bullet-3d*
[type]
@init
@init-bullet
(case type
:rigid (discrete-dynamics)
:soft-rigid (soft-rigid-dynamics)