;Reading at top level in Lisp Listener 3.
;Reading in base 10 in package USER with standard Zetalisp readtable.

'(process-run-function "try to crash" #'(lambda() 
(with-output-to-string (terminal-io)
(foo))))
(PROCESS-RUN-FUNCTION "try to crash" (FUNCTION (LAMBDA NIL (WITH-OUTPUT-TO-STRING (TERMINAL-IO) (FOO)))))
(dribble)