Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

maybe..

  • Loading branch information...
commit 99f97929bb1e1f57644683c38e7a3de6829922f4 1 parent ef43ac9
Kristoffer Grönlund authored
Showing with 6 additions and 0 deletions.
  1. +6 −0 test3.lisp
View
6 test3.lisp
@@ -4,3 +4,9 @@
(macro 'def '(name args +body)
'(list3 'setq name (list3 'fn args *body)))
+(macro 'def '(name args body..)
+ '(list 'setq name (list 'label name (list 'fn args *body))))
+
+(macro 'defmacro '(name args body..)
+ '(list 'macro 'name 'args (quote-all *body)))
+
Please sign in to comment.
Something went wrong with that request. Please try again.