dmbcs/guile
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* slib.scm (slib:load): Use load-from-path instead of

Browse source 
primitive-load-path so that backtraces get narrowed properly at
the top.

* boot-9.scm (top-repl): Save stack already in signal handler in
order to narrow it correctly.
(save-stack): Adjust narrowing tag for the top of load-stacks.
This commit is contained in:
Mikael Djurfeldt 1997-08-14 18:24:46 +00:00
commit 096d5f90c3
3 changed files with 15 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

3
ice-9/boot-9.scm
View file

@ -2307,7 +2307,7 @@
((repl-stack)
(apply make-stack #t save-stack eval narrowing))
((load-stack)
(apply make-stack #t save-stack gsubr-apply narrowing))
(apply make-stack #t save-stack 0 narrowing))
((tk-stack)
(apply make-stack #t save-stack tk-stack-mark narrowing))
((#t)
@ -2676,6 +2676,7 @@
(lambda ()
(let ((make-handler (lambda (msg)
(lambda (sig)
(save-stack %deliver-signals)
(scm-error 'signal
#f
msg