diff options
| author | Rich Hickey <richhickey@gmail.com> | 2006-04-30 18:58:58 +0000 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2006-04-30 18:58:58 +0000 |
| commit | e7f3719fcbe74e0f923243f9628f7450ebed2e4f (patch) | |
| tree | db6b2d5daa706ba366ec56816dbd81139a7c16bf /src/lisp/test.lisp | |
| parent | 96db6cebb28b28f30fdc9b7232a8172a18f52ace (diff) | |
added if
Diffstat (limited to 'src/lisp/test.lisp')
| -rw-r--r-- | src/lisp/test.lisp | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/lisp/test.lisp b/src/lisp/test.lisp index f3427df2..37b550e0 100644 --- a/src/lisp/test.lisp +++ b/src/lisp/test.lisp @@ -40,4 +40,12 @@ (d (x) (d a))) (c x))) + +(defn fif (a b x y z) + (if a + (if (if x y z) + y + z) + b)) + (defn fr (a b & c) c)
\ No newline at end of file |