11 lines
142 B
Text
11 lines
142 B
Text
|
#!/usr/bin/picolisp /usr/lib/picolisp/lib.l
|
||
|
|
|
||
|
|
(de c ()
|
||
|
|
(prinl "Got 'c': " (opt)) )
|
||
|
|
|
||
|
|
(de h ()
|
||
|
|
(prinl "Got 'h': " (opt)) )
|
||
|
|
|
||
|
|
(load T)
|
||
|
|
(bye)
|