Mercurial > hg > octave-nkf

comparison src/pt-except.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 fa3482b34599
children 5e2c68946f30
comparison
equal deleted inserted replaced
4428:067160691cc9 4429:c1f6200b5f0e
25 #endif 25 #endif
26 26
27 #ifdef HAVE_CONFIG_H 27 #ifdef HAVE_CONFIG_H
28 #include <config.h> 28 #include <config.h>
29 #endif 29 #endif
30
31 #include "quit.h"
30 32
31 #include "error.h" 33 #include "error.h"
32 #include "oct-lvalue.h" 34 #include "oct-lvalue.h"
33 #include "ov.h" 35 #include "ov.h"
34 #include "pt-bp.h" 36 #include "pt-bp.h"
53 } 55 }
54 56
55 static void 57 static void
56 do_catch_code (void *ptr) 58 do_catch_code (void *ptr)
57 { 59 {
60 if (octave_interrupt_immediately)
61 return;
62
58 tree_statement_list *list = static_cast<tree_statement_list *> (ptr); 63 tree_statement_list *list = static_cast<tree_statement_list *> (ptr);
59 64
60 unwind_protect::begin_frame ("do_catch_code"); 65 unwind_protect::begin_frame ("do_catch_code");
61 66
62 // Set up for letting the user print any messages from errors that 67 // Set up for letting the user print any messages from errors that