diff options
| author | nea <nea@nea.moe> | 2023-08-10 00:05:10 +0200 |
|---|---|---|
| committer | nea <nea@nea.moe> | 2023-08-10 00:05:10 +0200 |
| commit | 7ce91434a452dc68f39aa34b646e691635c55e07 (patch) | |
| tree | 9d1e6a94bb91cbe46ad60a17afbe4f760692ad01 /test | |
| parent | 4878767a97c9ca78ec279e5a33cd7ae5b7b65493 (diff) | |
| download | nealisp-7ce91434a452dc68f39aa34b646e691635c55e07.tar.gz nealisp-7ce91434a452dc68f39aa34b646e691635c55e07.tar.bz2 nealisp-7ce91434a452dc68f39aa34b646e691635c55e07.zip | |
If function
Diffstat (limited to 'test')
| -rw-r--r-- | test/res/test.lisp | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/test/res/test.lisp b/test/res/test.lisp index 79c96dc..edadffd 100644 --- a/test/res/test.lisp +++ b/test/res/test.lisp @@ -3,6 +3,9 @@ (myfun :myfunworks) ((lambda (a) (debuglog a)) :atom) (debuglog a) +(defun testsomething (c) (debuglog (if c "truthy value" "falsey value"))) +(testsomething true) +(testsomething false) (defun testlog (a ...) (seq (debuglog "a" a) (debuglog "..." ...))) |