14:43:45scymtymdoes (funcall (compile nil `(lambda (x) (when x (print 1)) (loop))) nil) go into an infinite loop printing 1s for anybody else (don't try it in an important session, the loop can be difficult to interrupt)?
14:47:02jackdanielit does for me on SBCL 2.2.1.77-fa242a98b