Greetings! Brilliant! Its in now, please let me know if you have problems.
Take care, Robert Boyer <[EMAIL PROTECTED]> writes: > I have a recommendation for a change in the standard GCL error handler, > namely that it should do something that is the moral equivalent of: > > (trace (si::universal-error-handler :entry (clear-input *standard-input*))) > > Currently, if you stuff a lot of input to GCL (as I often do, stuffing text > into an EMACS shell), when GCL gets to an error it (stupidly, in my opinion) > continues to eat the ordinary input from the error break as if everything was > normal. This can lead to lots of utterly crazy input and output until you > find your way back to the first error. (Whether that should be *terminal-io* > instead of *standard-input* above I am unsure.) > > Bob > > Thus you would see something like the first transcript below rather than the > second. > > > GCL (GNU Common Lisp) 2.7.0 ANSI Dec 11 2005 19:43:06 > Source License: LGPL(gcl,gmp,pargcl), GPL(unexec,bfd) > Binary License: GPL due to GPL'ed components: (BFD UNEXEC) > Modifications of this banner must retain notice of a compatible license > Dedicated to the memory of W. Schelter > > Use (help) to get some basic information on how to use GCL. > > >(trace (si::universal-error-handler :entry (clear-input *standard-input*))) > > (SYSTEM:UNIVERSAL-ERROR-HANDLER) > > >(car 1) > 2 > 3 > 4 > 5 > 6 > 7 > 8 > 9 > > > 1> NIL > Error in CAR [or a callee]: 1 is not of type LIST. > > Fast links are on: do (si::use-fast-links nil) for debugging > Broken at SYSTEM::TRACE-CALL. Type :H for Help. > 1 (Continue) Return to top level. > dbl:>> > > Instead of this noise: > GCL (GNU Common Lisp) 2.7.0 ANSI Dec 11 2005 19:43:06 > Source License: LGPL(gcl,gmp,pargcl), GPL(unexec,bfd) > Binary License: GPL due to GPL'ed components: (BFD UNEXEC) > Modifications of this banner must retain notice of a compatible license > Dedicated to the memory of W. Schelter > > Use (help) to get some basic information on how to use GCL. > > >(car 1) > 2 > 3 > 4 > 5 > 6 > 7 > 8 > 9 > > > Error in CAR [or a callee]: 1 is not of type LIST. > > Fast links are on: do (si::use-fast-links nil) for debugging > Broken at CONDITIONS::CLCS-UNIVERSAL-ERROR-HANDLER. Type :H for Help. > 1 (Continue) Return to top level. > dbl:>> > No such restart. > NIL > dbl:>> > No such restart. > NIL > dbl:>> > No such restart. > NIL > dbl:>> > No such restart. > NIL > dbl:>> > No such restart. > NIL > dbl:>> > No such restart. > NIL > dbl:>> > No such restart. > NIL > dbl:>> > No such restart. > NIL > dbl:>> > > > -- Camm Maguire [EMAIL PROTECTED] ========================================================================== "The earth is but one country, and mankind its citizens." -- Baha'u'llah _______________________________________________ Gcl-devel mailing list [email protected] http://lists.gnu.org/mailman/listinfo/gcl-devel
