Add tasks for all the new languages
This commit is contained in:
parent
9dc3c2bb62
commit
bba7bfd280
13208 changed files with 134745 additions and 0 deletions
14
Task/Variadic-function/XLISP/variadic-function.xlisp
Normal file
14
Task/Variadic-function/XLISP/variadic-function.xlisp
Normal file
|
|
@ -0,0 +1,14 @@
|
|||
(defun print-on-separate-lines (&rest xs)
|
||||
(for-each print xs))
|
||||
|
||||
; test the function:
|
||||
|
||||
(print-on-separate-lines 'i 'am 'doing 'a 'great 'work 'so 'that 'i 'cannot 'come 'down)
|
||||
|
||||
; to use it on a list of arguments assembled at run time, first create your list
|
||||
|
||||
(define test '(why should the work cease whilst i leave it and come down to you))
|
||||
|
||||
; and then call APPLY:
|
||||
|
||||
(apply print-on-separate-lines test)
|
||||
Loading…
Add table
Add a link
Reference in a new issue