Skip to content

Commit

Permalink
wip3
Browse files Browse the repository at this point in the history
  • Loading branch information
pfeodrippe committed Jan 14, 2025
1 parent 147c7cc commit 6e4e5bd
Showing 1 changed file with 5 additions and 5 deletions.
10 changes: 5 additions & 5 deletions test/vybe/flecs_test.clj
Original file line number Diff line number Diff line change
Expand Up @@ -159,15 +159,15 @@
:inout (flecs/EcsIn)
:oper (flecs/EcsOptional)}]}})))))

#_(deftest default-systems-test
(deftest default-systems-test
(let [w (vf/make-world)]
(vf/eid w vt/Translation)
(vf/eid w vt/Rotation)
(vf/eid w vt/Scale)
(vf/eid w vt/Transform)
(vf/eid w :global)
(default-systems w)
#_(vf.c/vybe-default-systems-c w)
#_(default-systems w)
(vf.c/vybe-default-systems-c w)

(merge w {:alice [(vt/Scale [1.0 1.0 1.0]) (vt/Translation)
(vt/Rotation [0 0 0 1]) [(vt/Transform) :global] (vt/Transform)
Expand Down Expand Up @@ -196,7 +196,7 @@
;; -- Macro system.
(vc/defn* vybe-transform-2 :- :void
[it :- [:* vf/iter_t]]
#_(let [pos (field it vt/Translation 0)
(let [pos (field it vt/Translation 0)
rot (field it vt/Rotation 1)
scale (field it vt/Scale 2)

Expand Down Expand Up @@ -242,7 +242,7 @@
w system-desc)))
#_ (ddd (vf/make-world))

(vc/defn* default-systems-2 :- :void
#_(vc/defn* default-systems-2 :- :void
[w :- :*]
(tap> 9998)
(ddd w)
Expand Down

0 comments on commit 6e4e5bd

Please sign in to comment.