diff options
| author | Rich Hickey <richhickey@gmail.com> | 2006-05-03 22:41:26 +0000 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2006-05-03 22:41:26 +0000 |
| commit | 2b24aa4ccdc69cd73878af135999c5487635c1c1 (patch) | |
| tree | 637c9f7838c5488fc0f120099703ea0bd73dd27b /src/lisp/test.lisp | |
| parent | 0f37571e76e21f39e3c3696a5d591004dd572085 (diff) | |
added bind
Diffstat (limited to 'src/lisp/test.lisp')
| -rw-r--r-- | src/lisp/test.lisp | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/src/lisp/test.lisp b/src/lisp/test.lisp index 16c43539..d724da70 100644 --- a/src/lisp/test.lisp +++ b/src/lisp/test.lisp @@ -103,4 +103,12 @@ (try (foo x) (fred ex) - (bar x)))
\ No newline at end of file + (bar x))) + +(defn fbind (a b c x) + (bind ((x a) + (y b)) + c) + (bind ((x a) + (y b)) + c))
\ No newline at end of file |