mirror/jak-project
1
0
Fork 0
mirror of https://github.com/open-goal/jak-project synced 2026-08-18 13:53:01 -04:00
Code Issues Packages Projects Releases Wiki Activity

undo changes to goalsrc

Browse Source
This commit is contained in:
water
2023-09-30 10:24:37 -04:00
parent 83c095ab99
commit 2284a336fd
1954 changed files with 159925 additions and 156681 deletions
Download Patch File Download Diff File Expand all files Collapse all files
test/decompiler/reference/jak2/kernel/gstring_REF.gc
Generated Vendored
+5 -5
View File
@@ -2,21 +2,21 @@
(in-package goal)
;; definition for method 4 of type string
(defmethod length string ((obj string))
(let ((v1-0 (-> obj data)))
(defmethod length string ((this string))
(let ((v1-0 (-> this data)))
(while (nonzero? (-> v1-0 0))
(nop!)
(nop!)
(nop!)
(set! v1-0 (&-> v1-0 1))
)
(&- v1-0 (the-as uint (-> obj data)))
(&- v1-0 (the-as uint (-> this data)))
)
)
;; definition for method 5 of type string
(defmethod asize-of string ((obj string))
(+ (-> obj allocated-length) 1 (-> string size))
(defmethod asize-of string ((this string))
(+ (-> this allocated-length) 1 (-> string size))
)
;; definition for function copy-string<-string