(drak)
2014-01-05: add examples with macros. add examples with macros.
diff --git a/examples/macros.w b/examples/macros.w new file mode 100644 --- /dev/null +++ b/examples/macros.w @@ -0,0 +1,32 @@ +#!/home/arne/wisp/wisp-multiline.sh -l guile +; !# + +;; Testing syntax-rules and syntax-case with wisp + +;; Syntax-case: add1 (from guile docs) +define-syntax add1 + lambda : x + syntax-case x : + : _ exp + syntax : + exp 1 + +;; use the #' shorthand for syntax +define-syntax add2 + lambda : x + syntax-case x : + : _ exp + #' + exp 2 + +;; Syntax-rules add which requires at least 1 argument +define-syntax add-with-argument + syntax-rules : + : _ a b ... + + a b ... + +;; Same with syntax-case +define-syntax add-with-argument + lambda : x + syntax-case x : + : _ a b ... + #' + a b ... +