mirror of
https://github.com/open-goal/jak-project
synced 2026-05-26 07:39:12 -04:00
8 lines
142 B
Common Lisp
8 lines
142 B
Common Lisp
(defun stack-test ()
|
|
(let ((arr (new 'stack-no-clear 'array 'uint8 12)))
|
|
(logand #b1111 (the uint (&-> arr 3)))
|
|
)
|
|
)
|
|
|
|
(stack-test)
|