5 lines
77 B
Text
5 lines
77 B
Text
|
(let ((i 1024))
|
||
|
|
(while (> i 0)
|
||
|
|
(message "%d" i)
|
||
|
|
(setq i (/ i 2))))
|