diff options
author | kartofen <mladenovnasko0@gmail.com> | 2024-09-01 00:44:56 +0300 |
---|---|---|
committer | kartofen <mladenovnasko0@gmail.com> | 2024-09-01 00:44:56 +0300 |
commit | 329166705de225bc766e56cc77765430065c456d (patch) | |
tree | 050b12b3a202cf43e9850903bd5b8bcc8ec67d7c /files | |
parent | e1ceef73192f0300ff9b10ba9a16475fbebeaa5f (diff) |
linked list and macros
Diffstat (limited to 'files')
-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)) + |