exercises and notes from "Gentle introduction"

trace-and-dtrace.lisp

@@ -0,0 +1,13 @@
+
+(defun half (n) (* n 0.5))
+
+(defun average (x y)
+  (half (+ x y)))
+
+(trace)                                 ; returns list of traced functions
+(trace half average)
+
+(average 7 5)                           ; tree of calls printed into repl
+
+(untrace half)
+(untrace)                               ; untraces all