Mercurial > octave-nkf
comparison src/toplev.cc @ 5189:85b315ad5f7d
[project @ 2005-03-04 02:46:08 by jwe]
author | jwe |
---|---|
date | Fri, 04 Mar 2005 02:46:08 +0000 |
parents | 47e2ef7d0ad6 |
children | 16a6247730d9 |
comparison
equal
deleted
inserted
replaced
5188:fd90c6df7d52 | 5189:85b315ad5f7d |
---|---|
109 octave_restore_signal_mask (); | 109 octave_restore_signal_mask (); |
110 octave_catch_interrupts (); | 110 octave_catch_interrupts (); |
111 } | 111 } |
112 | 112 |
113 int | 113 int |
114 main_loop (const std::string& fun_to_call) | 114 main_loop (void) |
115 { | 115 { |
116 octave_save_signal_mask (); | 116 octave_save_signal_mask (); |
117 | 117 |
118 if (octave_set_current_context) | 118 if (octave_set_current_context) |
119 { | 119 { |
134 octave_bad_alloc_hook = unwind_protect::run_all; | 134 octave_bad_alloc_hook = unwind_protect::run_all; |
135 | 135 |
136 octave_catch_interrupts (); | 136 octave_catch_interrupts (); |
137 | 137 |
138 octave_initialized = true; | 138 octave_initialized = true; |
139 | |
140 if (! fun_to_call.empty ()) | |
141 feval (fun_to_call); | |
142 | 139 |
143 // The big loop. | 140 // The big loop. |
144 | 141 |
145 int retval = 0; | 142 int retval = 0; |
146 do | 143 do |