Git - code.swisschili.sh
code.swisschili.sh
/
bluejay
/
c0acce457146e0b01b72b3dcead6907a4289df99
/
.
/
src
/
lisp
/
test-args.lisp
blob: 75f6107d1a9db2f0fdee480b0a5b158c021cca62 [
file
] [
log
] [
blame
]
; (load "../../lib/lisp/std/std.lisp")
(
defun
with-optional
(
required
(
optional
3
))
(
+
required optional
))
(
defun
takes-varargs
(
&
rest
)
(
print rest
))
(
defun
main
(
)
(
print
"hi"
)
(
takes-varargs
1
2
3
4
))