Files
2021-07-26 21:39:05 -04:00

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)