mirror/jak-project
1
0
Fork 0
mirror of https://github.com/open-goal/jak-project synced 2026-09-01 17:59:55 -04:00
Code Issues Packages Projects Releases Wiki Activity

[decompiler] fix bad cast and crash on bad and/or recognition (#626)

Browse Source 
* fix small bugs

* fix missing inlining of derefs
This commit is contained in:
water111
2021-06-25 20:13:22 -04:00
committed by GitHub
parent bfc1173ed5
commit 409be41596
7 changed files with 30 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files
test/decompiler/reference/engine/geometry/vol-h_REF.gc
+6 -6
View File
@@ -115,11 +115,11 @@
)
(when (>= s4-0 0)
(let ((s3-0 s4-0)
(s2-0 (-> (-> (the-as res-lump s5-1) tag) s4-0))
(s2-0 (-> (the-as res-lump s5-1) tag s4-0))
)
(let ((v1-10 0))
)
(while (= (-> s2-0 name) (-> (-> (the-as res-lump s5-1) tag) s4-0 name))
(while (= (-> s2-0 name) (-> (the-as res-lump s5-1) tag s4-0 name))
(let
((v1-12
(make-property-data
@@ -145,7 +145,7 @@
(+ (-> (the-as vol-control gp-0) pos-vol-count) 1)
)
(+! s3-0 1)
(set! s2-0 (-> (-> (the-as res-lump s5-1) tag) s3-0))
(set! s2-0 (-> (the-as res-lump s5-1) tag s3-0))
)
)
)
@@ -165,11 +165,11 @@
)
(when (>= s4-1 0)
(let ((s3-1 s4-1)
(s2-1 (-> (-> (the-as res-lump s5-2) tag) s4-1))
(s2-1 (-> (the-as res-lump s5-2) tag s4-1))
)
(let ((v1-29 0))
)
(while (= (-> s2-1 name) (-> (-> (the-as res-lump s5-2) tag) s4-1 name))
(while (= (-> s2-1 name) (-> (the-as res-lump s5-2) tag s4-1 name))
(let
((v1-31
(make-property-data
@@ -195,7 +195,7 @@
(+ (-> (the-as vol-control gp-0) neg-vol-count) 1)
)
(+! s3-1 1)
(set! s2-1 (-> (-> (the-as res-lump s5-2) tag) s3-1))
(set! s2-1 (-> (the-as res-lump s5-2) tag s3-1))
)
)
)