diff options
Diffstat (limited to 'test.lisp')
| -rw-r--r-- | test.lisp | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/test.lisp b/test.lisp deleted file mode 100644 index ef13abb..0000000 --- a/test.lisp +++ /dev/null @@ -1,22 +0,0 @@ -(print! (list/map (lambda (x) (+ x 1)) (list 1 2 3 4 5))) -(print! (eval! '(cons 1 2))) -(defun! say-hi () - (princ! "hello computer")) -(say-hi) -(setq! counter 42) -(let ((counter 0)) - (print! counter) - (fset! 'count (lambda () (setq! counter (+ counter 1)))) - (fset! 'query (lambda () counter))) -(print! (count)) (print! (query)) -(print! (count)) (print! (query)) -(defun! bar (x & xs) - (print! x) - (print! xs)) -(bar 1 2 3 4 5) -(defun! baz (& kwargs) - (print! kwargs) - (let ((foo (plist/get :foo kwargs)) - (bar (plist/get :bar kwargs))) - bar)) -(print! (baz :foo 10 :bar 5 :baz 3)) |