[goos] fix pretty printer bugs, update ref after pretty printer changes (#1063)

* update ref after pretty printer changes

* another try
This commit is contained in:
water111
2022-01-08 15:09:00 -05:00
committed by GitHub
parent 7b1572883c
commit 691c33f8d9
207 changed files with 8537 additions and 8522 deletions
+10 -9
View File
@@ -478,10 +478,9 @@
(set! (-> s2-0 rmat vector 1 y) (+ (* f3-0 f2-1) (* f1-2 f0-3)))
)
(cond
((or
(< (-> s1-0 y) (-> obj die-if-below-y))
(< (-> obj die-if-beyond-xz-dist-sqrd) (vector-vector-xz-distance s1-0 (-> obj root trans)))
)
((or (< (-> s1-0 y) (-> obj die-if-below-y))
(< (-> obj die-if-beyond-xz-dist-sqrd) (vector-vector-xz-distance s1-0 (-> obj root trans)))
)
(set! s3-0 (TODO-RENAME-24 obj arg0 s3-0))
)
(else
@@ -534,7 +533,10 @@
;; failed to figure out what this is:
(defstate joint-exploder-shatter (joint-exploder)
:enter
(behavior () (set! (-> self state-time) (-> *display* base-frame-counter)) (none))
(behavior ()
(set! (-> self state-time) (-> *display* base-frame-counter))
(none)
)
:trans
(behavior ()
(let* ((f1-0 (the float (- (-> *display* base-frame-counter) (-> self state-time))))
@@ -665,10 +667,9 @@
(-> s3-0 transv)
(rand-vu-float-range (-> obj tuning fountain-rand-transv-hi x) (-> obj tuning fountain-rand-transv-hi y))
)
(+!
(-> s3-0 transv y)
(rand-vu-float-range (-> obj tuning fountain-rand-transv-hi z) (-> obj tuning fountain-rand-transv-hi w))
)
(+! (-> s3-0 transv y)
(rand-vu-float-range (-> obj tuning fountain-rand-transv-hi z) (-> obj tuning fountain-rand-transv-hi w))
)
(set! (-> s3-0 transv w) 1.0)
)
(else