Mercurial > octave

comparison src/toplev.h @ 11586:12df7854fa7c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
strip trailing whitespace from source files
author John W. Eaton <jwe@octave.org>
date Thu, 20 Jan 2011 17:24:59 -0500
parents fd0a3ac60b0e
children 7dd7cccf0757
comparison
equal deleted inserted replaced
11585:1473d0cf86d2 11586:12df7854fa7c
205 // be built-in. 205 // be built-in.
206 static octave_function *element (size_t n) 206 static octave_function *element (size_t n)
207 { 207 {
208 return instance_ok () ? instance->do_element (n) : 0; 208 return instance_ok () ? instance->do_element (n) : 0;
209 } 209 }
210 210
211 // First user-defined function on the stack. 211 // First user-defined function on the stack.
212 static octave_user_code *caller_user_code (size_t nskip = 0) 212 static octave_user_code *caller_user_code (size_t nskip = 0)
213 { 213 {
214 return instance_ok () ? instance->do_caller_user_code (nskip) : 0; 214 return instance_ok () ? instance->do_caller_user_code (nskip) : 0;
215 } 215 }
276 static void pop (void) 276 static void pop (void)
277 { 277 {
278 if (instance_ok ()) 278 if (instance_ok ())
279 instance->do_pop (); 279 instance->do_pop ();
280 } 280 }
281 281
282 static void clear (void) 282 static void clear (void)
283 { 283 {
284 if (instance_ok ()) 284 if (instance_ok ())
285 instance->do_clear (); 285 instance->do_clear ();
286 } 286 }
342 } 342 }
343 343
344 return retval; 344 return retval;
345 } 345 }
346 346
347 octave_user_code *do_caller_user_code (size_t nskip) const; 347 octave_user_code *do_caller_user_code (size_t nskip) const;
348 348
349 void do_push (octave_function *f, symbol_table::scope_id scope, 349 void do_push (octave_function *f, symbol_table::scope_id scope,
350 symbol_table::context_id context) 350 symbol_table::context_id context)
351 { 351 {
352 size_t prev_frame = curr_frame; 352 size_t prev_frame = curr_frame;