8 lines
148 B
Common Lisp
8 lines
148 B
Common Lisp
|
(let (items)
|
||
|
|
(gc) ; name varies by implementation
|
||
|
|
(room)
|
||
|
|
(dotimes (x 512)
|
||
|
|
(push (allocate-something-of-interest) items))
|
||
|
|
(gc)
|
||
|
|
(room))
|