scsh-0.6/scsh/ekko.scm

14 lines
187 B
Scheme
Raw Normal View History

2003-05-01 06:21:33 -04:00
#!/usr/local/bin/scsh -s
!#
(define (main args)
(for-each (lambda (f) (display f) (write-char #\ ))
args)
(newline))
(define (ekko)
(main command-line-arguments)
)
(ekko)