things going well

bin/test.slime

@@ -1,7 +1,7 @@
 (import "alist.slime")
 
 (define-typed (tf n :number a :alist)
-  (printf n)
+  (printf :end " " "the number is" n "and the alist is")
   (pprint-alist a))
 
 
@@ -13,4 +13,5 @@
 (define (test a b)
   (printf a b))
 
+(printf "addr-of test:" (addr-of test))
 (test :ij :yes)