mirror of
https://github.com/open-goal/jak-project
synced 2026-09-02 10:11:44 -04:00
[decomp] finish actor-link-h and a few more (#592)
* finish actor-link-h * decompile files * fix pp issue
This commit is contained in:
@@ -1095,19 +1095,23 @@
|
||||
;; definition (debug) for function quaternion-validate
|
||||
;; INFO: Return type mismatch int vs none.
|
||||
(defun-debug quaternion-validate ((arg0 quaternion))
|
||||
(local-vars (pp process))
|
||||
(let ((f0-0 (quaternion-norm arg0)))
|
||||
(when (or (< 1.01 f0-0) (< f0-0 0.99))
|
||||
(format #t "WARNING: bad quaternion (magnitude ~F) process is " f0-0)
|
||||
(if (and pp (type-type? (-> pp type) process-tree))
|
||||
(format #t "~A~%" (-> pp name))
|
||||
(format #t "#f~%")
|
||||
)
|
||||
(with-pp (let ((f0-0 (quaternion-norm arg0)))
|
||||
(when (or (< 1.01 f0-0) (< f0-0 0.99))
|
||||
(format
|
||||
#t
|
||||
"WARNING: bad quaternion (magnitude ~F) process is "
|
||||
f0-0
|
||||
)
|
||||
(if (and pp (type-type? (-> pp type) process-tree))
|
||||
(format #t "~A~%" (-> pp name))
|
||||
(format #t "#f~%")
|
||||
)
|
||||
)
|
||||
)
|
||||
(let ((v0-5 0))
|
||||
)
|
||||
(none)
|
||||
)
|
||||
(let ((v0-5 0))
|
||||
)
|
||||
(none)
|
||||
)
|
||||
|
||||
;; definition for function quaternion-xz-angle
|
||||
|
||||
Reference in New Issue
Block a user