mirror of
https://github.com/open-goal/jak-project
synced 2026-07-04 13:30:41 -04:00
water
12 lines
229 B
Common Lisp
12 lines
229 B
Common Lisp
;-*-Scheme-*-
|
|
|
|
|
|
(test-setup 16 #f)
|
|
|
|
(let* ((base (the integer integer))
|
|
(field (the integer (-> integer methods)))
|
|
(offset (- field base)))
|
|
;;(format #t "offset of methods table is ~d~%" offset)
|
|
offset
|
|
)
|