mirror of
https://github.com/open-goal/jak-project
synced 2026-08-11 03:26:33 -04:00
sort enum bit fields
This commit is contained in:
+9
-12
@@ -782,11 +782,8 @@
|
||||
)
|
||||
(cond
|
||||
((= s4-0 'menu)
|
||||
(let ((s4-1 (new 'debug 'debug-menu arg0 (the-as string s5-1))))
|
||||
(set!
|
||||
s5-0
|
||||
(new 'debug 'debug-menu-item-submenu (the-as string s5-1) s4-1)
|
||||
)
|
||||
(let ((s4-1 (new 'debug 'debug-menu arg0 s5-1)))
|
||||
(set! s5-0 (new 'debug 'debug-menu-item-submenu s5-1 s4-1))
|
||||
(let* ((gp-1 (cdr (cdr arg1)))
|
||||
(a1-3 (car gp-1))
|
||||
)
|
||||
@@ -803,7 +800,7 @@
|
||||
)
|
||||
)
|
||||
((= s4-0 'main-menu)
|
||||
(set! s5-0 (new 'debug 'debug-menu arg0 (the-as string s5-1)))
|
||||
(set! s5-0 (new 'debug 'debug-menu arg0 s5-1))
|
||||
(let* ((gp-2 (cdr (cdr arg1)))
|
||||
(a1-6 (car gp-2))
|
||||
)
|
||||
@@ -828,7 +825,7 @@
|
||||
(new
|
||||
'debug
|
||||
'debug-menu-item-flag
|
||||
(the-as string s5-1)
|
||||
s5-1
|
||||
(the-as symbol (car (cdr (cdr arg1))))
|
||||
(debug-menu-func-decode (car (cdr (cdr (cdr arg1)))))
|
||||
)
|
||||
@@ -837,7 +834,7 @@
|
||||
(new
|
||||
'debug
|
||||
'debug-menu-item-function
|
||||
(the-as string s5-1)
|
||||
s5-1
|
||||
(the-as int (car (cdr (cdr arg1))))
|
||||
(debug-menu-func-decode (car (cdr (cdr (cdr arg1)))))
|
||||
)
|
||||
@@ -846,7 +843,7 @@
|
||||
(new
|
||||
'debug
|
||||
'debug-menu-item-var
|
||||
(the-as string s5-1)
|
||||
s5-1
|
||||
(the-as int (car (cdr (cdr arg1))))
|
||||
(the-as int (car (cdr (cdr (cdr arg1)))))
|
||||
)
|
||||
@@ -861,7 +858,7 @@
|
||||
(new
|
||||
'debug
|
||||
'debug-menu-item-var
|
||||
(the-as string s5-1)
|
||||
s5-1
|
||||
(the-as int (car (cdr (cdr arg1))))
|
||||
(the-as int (ref arg1 4))
|
||||
)
|
||||
@@ -898,7 +895,7 @@
|
||||
(new
|
||||
'debug
|
||||
'debug-menu-item-var
|
||||
(the-as string s5-1)
|
||||
s5-1
|
||||
(the-as int (car (cdr (cdr arg1))))
|
||||
(the-as int (ref arg1 4))
|
||||
)
|
||||
@@ -933,7 +930,7 @@
|
||||
(new
|
||||
'debug
|
||||
'debug-menu-item-var
|
||||
(the-as string s5-1)
|
||||
s5-1
|
||||
(the-as int (car (cdr (cdr arg1))))
|
||||
(the-as int (ref arg1 4))
|
||||
)
|
||||
|
||||
Reference in New Issue
Block a user