[Openmcl-devel] 3 questions - TLS the default? global thread-shared vars? .CDB gen broken?
Jason E. Aten
j.e.aten at gmail.com
Mon Mar 21 03:33:06 UTC 2011
Nice! Thank you David.
On Sun, Mar 20, 2011 at 9:04 PM, David L. Rager <ragerdl at gmail.com> wrote:
> Hi Jason,
> I think that all you need is something like the following transcript,
> but I include the pointer to the source code that helped me find the
> lhug-7:~$ ccl64
> Welcome to Clozure Common Lisp Version 1.7-dev-r14672M-trunk (LinuxX8664)!
> ? (defun foo (condition y)
> (declare (ignore y))
> (format t "~&Error: ~A" condition)
> (ignore-errors (throw 'asdfgh :qwer)))
> ? (setq *debugger-hook* 'foo)
> ? (catch 'asdfgh (car 3))
> ;Compiler warnings :
> ; In an anonymous lambda form at position 0: Error: "value 3 is not
> of the expected type LIST."
> ; signalled during compile-time evaluation of (CAR 3) .
> Error: value 3 is not of the expected type LIST.
> I obtained this by looking at ACL2's function our-abort (defined in
> file interface-raw.lisp, which is contained inside acl2.tar.gz, which
> can be downloaded at the following page:
> which automatically aborts from a raw Lisp error. It also has a
> pointer to ccl::*break-hook*, which I did not look into.
> > Oh yes, yes. Sorry I wasn't clear. I wanted to configure the condition
> > system to just skip asking me what restart I wanted. Instead, I would
> > ccl to just print the error and then return me to the top level without
> > having to press :Q. It might not be doable of course, but if it is, I
> > appreciate any hints on how to do this. Perhaps I can define a default
> > level condition handler that says "I got it," but then it does nothing
> > return to the REPL.
-------------- next part --------------
An HTML attachment was scrubbed...
More information about the Openmcl-devel