5 lines
120 B
Text
5 lines
120 B
Text
(de identity (Size)
|
|
(let L (need Size (1) 0)
|
|
(make
|
|
(do Size
|
|
(link (copy (rot L))) ) ) ) )
|