diff options
Diffstat (limited to 'files/test-lambda.l')
| -rw-r--r-- | files/test-lambda.l | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/files/test-lambda.l b/files/test-lambda.l index 71ef0bd..d15f3ff 100644 --- a/files/test-lambda.l +++ b/files/test-lambda.l @@ -2,7 +2,7 @@ (define add4 (make-add 4)) (add4 5) -'(a b ,((lambda (a) '(test . ,a)) 69) c d) +`(a b ,((lambda (a) `(test . ,a)) 69) c d) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; @@ -48,3 +48,9 @@ ;; (+list (do 100 (lambda (n) (fib n)))) (reverse (do 100 (lambda (n) (fib n)))) +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; + +;; don't know about a good example +(defmacro m (a) `(+ ,a 57)) +(m (+ 1 2)) + |