[decomp] clean up and make level-update-after-load work (#628)

* temp

* make level-update-after-load work

* add missing const
This commit is contained in:
water111
2021-06-26 13:03:31 -04:00
committed by GitHub
parent 490633d434
commit 1ffd42e090
30 changed files with 482 additions and 120 deletions
@@ -276,7 +276,7 @@
;; failed to figure out what this is:
(if (zero? entity-nav-login)
(set! entity-nav-login nothing)
(set! entity-nav-login (the-as (function basic none) nothing))
)
;; definition of type actor-bank
@@ -226,8 +226,8 @@
;; definition of type proxy-prototype-array-tie
(deftype proxy-prototype-array-tie (basic)
((prototype-array-tie basic :offset-assert 4)
(wind-vectors uint32 :offset-assert 8)
((prototype-array-tie prototype-array-tie :offset-assert 4)
(wind-vectors uint32 :offset-assert 8)
)
:method-count-assert 9
:size-assert #xc
@@ -86,7 +86,7 @@
;; definition of type drawable-tree-instance-tie
(deftype drawable-tree-instance-tie (drawable-tree)
((prototypes basic :offset 8)
((prototypes proxy-prototype-array-tie :offset 8)
)
:method-count-assert 18
:size-assert #x24
@@ -49,8 +49,8 @@
(boxes box8s-array :offset-assert 148)
(unk-data-3 uint32 :offset-assert 152)
(ambients drawable-inline-array-ambient :offset-assert 156)
(unk-data-4 uint32 :offset-assert 160)
(unk-data-5 uint32 :offset-assert 164)
(unk-data-4 float :offset-assert 160)
(unk-data-5 float :offset-assert 164)
(adgifs adgif-shader-array :offset-assert 168)
(unk-data-6 pointer :offset-assert 172)
(unk-data-7 pointer :offset-assert 176)
@@ -117,10 +117,10 @@
;; definition of type login-state
(deftype login-state (basic)
((state int32 :offset-assert 4)
(pos uint32 :offset-assert 8)
(elts uint32 :offset-assert 12)
(elt uint32 16 :offset-assert 16)
((state int32 :offset-assert 4)
(pos uint32 :offset-assert 8)
(elts uint32 :offset-assert 12)
(elt drawable 16 :offset-assert 16)
)
:method-count-assert 9
:size-assert #x50
@@ -3,9 +3,9 @@
;; definition of type load-dir
(deftype load-dir (basic)
((unknown basic :offset-assert 4)
(string-array (array string) :offset-assert 8)
(data-array (array basic) :offset-assert 12)
((unknown basic :offset-assert 4)
(string-array (array string) :offset-assert 8)
(data-array (array art-group) :offset-assert 12)
)
:method-count-assert 11
:size-assert #x10
@@ -50,7 +50,7 @@
(set!
(-> obj data-array)
(the-as
(array basic)
(array art-group)
((method-of-type array new) allocation array basic length)
)
)
@@ -749,8 +749,8 @@
;; definition of type vertical-planes-array
(deftype vertical-planes-array (basic)
((length uint32 :offset-assert 4)
(data vertical-planes :dynamic :offset 16)
((length uint32 :offset-assert 4)
(data vertical-planes :inline :dynamic :offset-assert 16)
)
:method-count-assert 9
:size-assert #x10