Parent Directory | Revision Log | Patch
revision 1.284 by mvo, Sun Sep 15 21:30:39 2002 UTC | revision 1.285 by mvo, Fri Oct 4 13:09:30 2002 UTC | |
---|---|---|
# | Line 2872 | Line 2872 |
2872 | ;; Make a backup copy of the stack | ;; Make a backup copy of the stack |
2873 | (fluid-set! before-signal-stack | (fluid-set! before-signal-stack |
2874 | (fluid-ref the-last-stack)) | (fluid-ref the-last-stack)) |
2875 | (save-stack %deliver-signals) | (save-stack 1) |
2876 | (scm-error 'signal | (scm-error 'signal |
2877 | #f | #f |
2878 | msg | msg |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |