Mercurial > octave-nkf

comparison src/toplev.cc @ 4429:c1f6200b5f0e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2003-06-17 04:36:08 by jwe]
author jwe
date Tue, 17 Jun 2003 04:36:08 +0000
parents 286a3345aa8e
children 0bca8443db39
comparison
equal deleted inserted replaced
4428:067160691cc9 4429:c1f6200b5f0e
96 octave_user_function *curr_parent_function = 0; 96 octave_user_function *curr_parent_function = 0;
97 97
98 static void 98 static void
99 recover_from_exception (void) 99 recover_from_exception (void)
100 { 100 {
101 unwind_protect::run_all ();
102 can_interrupt = true; 101 can_interrupt = true;
103 octave_interrupt_immediately = 0; 102 octave_interrupt_immediately = 0;
104 octave_interrupt_state = 0; 103 octave_interrupt_state = 0;
105 octave_allocation_error = 0; 104 octave_allocation_error = 0;
106 octave_restore_signal_mask (); 105 octave_restore_signal_mask ();
123 octave_restore_signal_mask (); 122 octave_restore_signal_mask ();
124 #endif 123 #endif
125 } 124 }
126 125
127 can_interrupt = true; 126 can_interrupt = true;
127
128 octave_interrupt_hook = unwind_protect::run_all;
129 octave_bad_alloc_hook = unwind_protect::run_all;
128 130
129 octave_catch_interrupts (); 131 octave_catch_interrupts ();
130 132
131 octave_initialized = true; 133 octave_initialized = true;
132 134