[Openmcl-devel] *readtable* and break loop

[Ben Hyde]

Gary Byers wrote:

 >  ... PROGV ... 

Oh, I like that.

Of course today's verison of break-loop has accumulated
quite a diverse assortment of 'stuff'  Shame there doesn't seem to
be any 'standard' about what dynamic environment the built in
debugger establishes.

I guess one could also do something along these lines...

  (setf *debugger-hook*
    #'(lambda (condition self)
         (let ((*readtable* (copy-readtable nil)))
             (invoke-debugger))))
  ;; note: typed, but untested..

Which I doubt puts you on the right frame pointer but such is life.

 - ben

-- 
http://enthusiasm.cozy.org/

_______________________________________________
Openmcl-devel mailing list
Openmcl-devel at clozure.com
http://clozure.com/cgi-bin/mailman/listinfo/openmcl-devel