Paul Emsley <paul.ems...@bioch.ox.ac.uk> writes: > This is Greg's Home: > http://home.gna.org/greg/
Thanks. > I made some fixes that didn't make it into stable release, I get the > fixed up Greg from here: > > http://www.ysbl.york.ac.uk/~emsley/software/extras/greg-2.0.0-pe.tar.gz OK, so basically you want to modify each occurrence of the (catch ...) pattern in ice-9/greg.scm: - Before each (catch ...), add `(set! stack-saved? #f)' - To each (catch ...) add a fourth parameter `lazy-handler-dispatch' - In the handler code of each (catch ...), add something like `(display-backtrace (fluid-ref the-last-stack) (current-error-port) #f #f '())' to print out the back trace. That's a bit messy because it reuses some of the boot-9.scm code which is really intended for the Guile REPL. To do something neater, you could copy just the bits of lazy-handler-dispatch that you really need. Regards, Neil
