[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
- To: DCP@SCRC-STONY-BROOK.ARPA
- Subject: *DEBUG-IO*
- From: Kent M Pitman <KMP@SCRC-STONY-BROOK.ARPA>
- Date: Thu, 29 May 86 13:03 EDT
- Cc: KMP@SCRC-STONY-BROOK.ARPA, Common-Lisp@SU-AI.ARPA
- In-reply-to: <860529100713.6.DCP@FIREBIRD.SCRC.Symbolics.COM>
I wanted code to behave temporarily as if *debug-io* were the terminal.
Arguably, I should have done
(let ((*terminal-io* *debug-io*)
(*standard-input* (make-synonym-stream '*terminal-io*)
(*standard-output* (make-synonym-stream '*terminal-io*)
but if I had instead done
(let ((*standard-input* *debug-io*) (*standard-output* *debug-io*))
then I would have been screwed up by code which inside my LET just did:
(let ((*standard-input* (make-synonym-stream '*terminal-io*))
(*standard-output* (make-synonym-stream '*terminal-io*)))
which would have them writing on the first terminal (not my intention).
The whole point of my binding the window in the first place is that I
wanted to leave the main screen undisturbed during a debugging break.
If recursive breaks or whatever were permitted a way of realizing
that I started off on the original window, I wouldn't get the effect
I wanted. This technique is highly useful in split-screen debugging of
- From: David C. Plummer <DCP@SCRC-QUABBIN.ARPA>