Redirect trace output to a file, even within events
See open-trace-file for a utility that redirects trace output to a file. The utility,
For example, we can open a trace file as follows, but the second form fails
to open a trace file if
(defttag t) (make-event (pprogn (open-trace-file! "xx") (value '(value-triple nil))))