6 lines
133 B
Scheme
6 lines
133 B
Scheme
(define (print . args)
|
|
(display (apply string-append args))
|
|
(newline))
|
|
|
|
(define (command-line-arguments)
|
|
(cdr (command-line)))
|