summaryrefslogtreecommitdiff
path: root/test/res/scratch.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'test/res/scratch.lisp')
-rw-r--r--test/res/scratch.lisp11
1 files changed, 9 insertions, 2 deletions
diff --git a/test/res/scratch.lisp b/test/res/scratch.lisp
index 3fc6ed7..95595b7 100644
--- a/test/res/scratch.lisp
+++ b/test/res/scratch.lisp
@@ -6,14 +6,21 @@
(debuglog "a" a)
(debuglog "..." ...)))
(testlog :test :work :whatever)
-(def helloworld (pure "hello world"))
+(def helloworld
+ (pure "hello world"))
(debuglog helloworld (helloworld))
(debuglog "+" (+ 1.2 15))
(debuglog "-" (- 1 3))
(debuglog "*" (* 10 10))
(debuglog "/" (/ 1 3 2))
(debuglog "============")
-(defun testsomething (c) (debuglog (if! c (seq (debuglog "left evaluated") (return "truthy value")) "falsey value")))
+(defun testsomething (c)
+ (debuglog
+ (if! c
+ (seq
+ (debuglog "left evaluated")
+ (return "truthy value"))
+ "falsey value")))
(testsomething true)
(testsomething false)
(noop)