mirror of
https://github.com/open-goal/jak-project
synced 2026-08-04 17:19:49 -04:00
[decompiler] Make addition nicer (#733)
* temp * update refs * update reference * fix tests
This commit is contained in:
@@ -23,7 +23,7 @@
|
||||
|
||||
;; definition for function float-lookup-redline
|
||||
(defun float-lookup-redline ((arg0 float))
|
||||
(let ((a0-3 (mod (+ (+ (the int arg0) -1) *redline-index*) 400)))
|
||||
(let ((a0-3 (mod (+ (the int arg0) -1 *redline-index*) 400)))
|
||||
(-> *redline-table* a0-3)
|
||||
)
|
||||
)
|
||||
@@ -48,7 +48,7 @@
|
||||
|
||||
;; definition for function float-lookup-blueline
|
||||
(defun float-lookup-blueline ((arg0 float))
|
||||
(let ((a0-3 (mod (+ (+ (the int arg0) -1) *blueline-index*) 400)))
|
||||
(let ((a0-3 (mod (+ (the int arg0) -1 *blueline-index*) 400)))
|
||||
(-> *blueline-table* a0-3)
|
||||
)
|
||||
)
|
||||
@@ -73,7 +73,7 @@
|
||||
|
||||
;; definition for function float-lookup-greenline
|
||||
(defun float-lookup-greenline ((arg0 float))
|
||||
(let ((a0-3 (mod (+ (+ (the int arg0) -1) *greenline-index*) 400)))
|
||||
(let ((a0-3 (mod (+ (the int arg0) -1 *greenline-index*) 400)))
|
||||
(-> *greenline-table* a0-3)
|
||||
)
|
||||
)
|
||||
@@ -98,7 +98,7 @@
|
||||
|
||||
;; definition for function float-lookup-yellowline
|
||||
(defun float-lookup-yellowline ((arg0 float))
|
||||
(let ((a0-3 (mod (+ (+ (the int arg0) -1) *yellowline-index*) 400)))
|
||||
(let ((a0-3 (mod (+ (the int arg0) -1 *yellowline-index*) 400)))
|
||||
(-> *yellowline-table* a0-3)
|
||||
)
|
||||
)
|
||||
@@ -123,7 +123,7 @@
|
||||
|
||||
;; definition for function float-lookup-timeplot
|
||||
(defun float-lookup-timeplot ((arg0 float))
|
||||
(let ((a0-3 (mod (+ (+ (the int arg0) -1) *timeplot-index*) 400)))
|
||||
(let ((a0-3 (mod (+ (the int arg0) -1 *timeplot-index*) 400)))
|
||||
(-> *timeplot-table* a0-3)
|
||||
)
|
||||
)
|
||||
|
||||
@@ -645,10 +645,7 @@
|
||||
(- (-> obj summed-len) (-> obj point arg0 tp-length))
|
||||
)
|
||||
(vector-!
|
||||
(the-as
|
||||
vector
|
||||
(+ (the-as uint (-> obj point 0 direction)) (the-as uint (* 48 arg0)))
|
||||
)
|
||||
(the-as vector (+ (the-as uint (-> obj point 0 direction)) (* 48 arg0)))
|
||||
(the-as vector (-> obj point v1-11))
|
||||
(the-as vector (-> obj point arg0))
|
||||
)
|
||||
@@ -656,10 +653,7 @@
|
||||
(set!
|
||||
(-> obj point arg0 tp-length)
|
||||
(vector-normalize-ret-len!
|
||||
(the-as
|
||||
vector
|
||||
(+ (the-as uint (-> obj point 0 direction)) (the-as uint (* 48 arg0)))
|
||||
)
|
||||
(the-as vector (+ (the-as uint (-> obj point 0 direction)) (* 48 arg0)))
|
||||
1.0
|
||||
)
|
||||
)
|
||||
@@ -754,16 +748,13 @@
|
||||
(vector-dot
|
||||
(the-as
|
||||
vector
|
||||
(+
|
||||
(the-as uint (-> obj point 0 direction))
|
||||
(the-as uint (* 48 v1-15))
|
||||
)
|
||||
(+ (the-as uint (-> obj point 0 direction)) (* 48 v1-15))
|
||||
)
|
||||
(the-as
|
||||
vector
|
||||
(+
|
||||
(the-as uint (the-as vector (-> obj point 0 direction)))
|
||||
(the-as uint (* 48 a0-14))
|
||||
(* 48 a0-14)
|
||||
)
|
||||
)
|
||||
)
|
||||
@@ -818,16 +809,13 @@
|
||||
(vector-dot
|
||||
(the-as
|
||||
vector
|
||||
(+
|
||||
(the-as uint (-> obj point 0 direction))
|
||||
(the-as uint (* 48 s4-1))
|
||||
)
|
||||
(+ (the-as uint (-> obj point 0 direction)) (* 48 s4-1))
|
||||
)
|
||||
(the-as
|
||||
vector
|
||||
(+
|
||||
(the-as uint (the-as vector (-> obj point 0 direction)))
|
||||
(the-as uint (* 48 v1-11))
|
||||
(* 48 v1-11)
|
||||
)
|
||||
)
|
||||
)
|
||||
@@ -858,20 +846,14 @@
|
||||
(s2-0 (-> obj end-point))
|
||||
)
|
||||
(vector-!
|
||||
(the-as
|
||||
vector
|
||||
(+ (the-as uint (-> obj point 0 direction)) (the-as uint (* 48 s2-0)))
|
||||
)
|
||||
(the-as vector (+ (the-as uint (-> obj point 0 direction)) (* 48 s2-0)))
|
||||
arg0
|
||||
(the-as vector (-> obj point s2-0))
|
||||
)
|
||||
(set!
|
||||
(-> obj point s2-0 tp-length)
|
||||
(vector-normalize-ret-len!
|
||||
(the-as
|
||||
vector
|
||||
(+ (the-as uint (-> obj point 0 direction)) (the-as uint (* 48 s2-0)))
|
||||
)
|
||||
(the-as vector (+ (the-as uint (-> obj point 0 direction)) (* 48 s2-0)))
|
||||
1.0
|
||||
)
|
||||
)
|
||||
@@ -1031,14 +1013,8 @@
|
||||
(let ((s1-0 (-> obj point v1-8 next)))
|
||||
(vector-!
|
||||
s2-0
|
||||
(the-as
|
||||
vector
|
||||
(+ (the-as uint (-> obj point 0 direction)) (the-as uint (* 48 s1-0)))
|
||||
)
|
||||
(the-as
|
||||
vector
|
||||
(+ (the-as uint (-> obj point 0 direction)) (the-as uint (* 48 v1-8)))
|
||||
)
|
||||
(the-as vector (+ (the-as uint (-> obj point 0 direction)) (* 48 s1-0)))
|
||||
(the-as vector (+ (the-as uint (-> obj point 0 direction)) (* 48 v1-8)))
|
||||
)
|
||||
(let* ((f0-4 (vector-normalize-ret-len! s2-0 1.0))
|
||||
(f0-5 (* 0.5 f0-4))
|
||||
@@ -2418,7 +2394,3 @@
|
||||
)
|
||||
arg0
|
||||
)
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user