8 lines
178 B
Text
8 lines
178 B
Text
|
(de makeList (Sep)
|
||
|
|
(let (Cnt 0 makeItem '((Str) (prinl (inc 'Cnt) Sep Str)))
|
||
|
|
(makeItem "first")
|
||
|
|
(makeItem "second")
|
||
|
|
(makeItem "third") ) )
|
||
|
|
|
||
|
|
(makeList ". ")
|