mirror/jak-project
1
0
Fork 0
mirror of https://github.com/open-goal/jak-project synced 2026-09-02 10:11:44 -04:00
Code Issues Packages Projects Releases Wiki Activity

[decomp] fisher and FIN.DGO (finalboss) level (#899)

Browse Source 
* decomp `fisher`, `robotboss`, `light-eco`, `green-eco-lurker`, `sage-finalboss`, `robotboss-weapon`, `robotboss-misc`

* fixes

* add files

* add `:states` list to `deftype` and fix files

* test state forward decl's on a few more types

* also the refs

* add light-eco

* whatever
This commit is contained in:
ManDude
2021-10-16 19:06:33 +01:00
committed by GitHub
parent 9225d28444
commit caac740aff
185 changed files with 30529 additions and 4422 deletions
Download Patch File Download Diff File Expand all files Collapse all files
test/decompiler/reference/engine/game/task/task-control_REF.gc
Vendored
+39 -26
View File
@@ -116,37 +116,50 @@
)
;; definition for method 9 of type task-control
;; INFO: Return type mismatch int vs game-task.
(defmethod current-task task-control ((obj task-control))
(cond
((= obj *null-task-control*)
(format 0 "ERROR<GMJ>: current-task received *null-task-control*~%")
0
)
((= (-> obj current-stage) -1)
0
)
(else
(the-as int (-> obj stage (-> obj current-stage) game-task))
)
(the-as game-task (cond
((= obj *null-task-control*)
(format
0
"ERROR<GMJ>: current-task received *null-task-control*~%"
)
0
)
((= (-> obj current-stage) -1)
0
)
(else
(the-as
int
(-> obj stage (-> obj current-stage) game-task)
)
)
)
)
)
;; definition for method 10 of type task-control
;; INFO: Return type mismatch int vs task-status.
(defmethod current-status task-control ((obj task-control))
(cond
((= obj *null-task-control*)
(format
0
"ERROR<GMJ>: current-status received self of *null-task-control*~%~%"
)
0
)
((= (-> obj current-stage) -1)
0
)
(else
(the-as int (-> obj stage (-> obj current-stage) status))
)
(the-as task-status (cond
((= obj *null-task-control*)
(format
0
"ERROR<GMJ>: current-status received self of *null-task-control*~%~%"
)
0
)
((= (-> obj current-stage) -1)
0
)
(else
(the-as
int
(-> obj stage (-> obj current-stage) status)
)
)
)
)
)
@@ -186,7 +199,7 @@
(format
0
"ERROR<GMJ>: close-status! received non-existent task-cstage(~S ~S)--returning #t.~%"
(game-task->string (the-as game-task a0-2))
(game-task->string a0-2)
(task-status->string arg0)
)
)