raspberry-pi-pico-machine-c.../compiler/scripts/loops.lisp

8 lines
79 B
Common Lisp
Raw Normal View History

2022-05-16 17:45:34 +02:00
(defvar i:uint32 0)
(loop while (< i 0xffff)
(print i)
(let i (+ i 1))
)