Data commit
This commit is contained in:
parent
7387c8f97b
commit
cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
10
Task/Nested-function/Common-Lisp/nested-function.lisp
Normal file
10
Task/Nested-function/Common-Lisp/nested-function.lisp
Normal file
|
|
@ -0,0 +1,10 @@
|
|||
(defun my-make-list (separator)
|
||||
(let ((counter 0))
|
||||
(flet ((make-item (item)
|
||||
(format nil "~a~a~a~%" (incf counter) separator item)))
|
||||
(concatenate 'string
|
||||
(make-item "first")
|
||||
(make-item "second")
|
||||
(make-item "third")))))
|
||||
|
||||
(format t (my-make-list ". "))
|
||||
Loading…
Add table
Add a link
Reference in a new issue