Mercurial > octave-dspies

comparison src/pt-except.h @ 8658:73c4516fae10

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
New evaluator and debugger derived from tree-walker class
author John W. Eaton <jwe@octave.org>
date Wed, 04 Feb 2009 00:47:53 -0500
parents 71f068b22fcc
children 35cd375d4bb3
comparison
equal deleted inserted replaced
8657:102e05821f93 8658:73c4516fae10
50 int l = -1, int c = -1) 50 int l = -1, int c = -1)
51 : tree_command (l, c), try_code (tc), catch_code (cc), 51 : tree_command (l, c), try_code (tc), catch_code (cc),
52 lead_comm (cl), mid_comm (cm), trail_comm (ct) { } 52 lead_comm (cl), mid_comm (cm), trail_comm (ct) { }
53 53
54 ~tree_try_catch_command (void); 54 ~tree_try_catch_command (void);
55
56 void eval (void);
57 55
58 tree_statement_list *body (void) { return try_code; } 56 tree_statement_list *body (void) { return try_code; }
59 57
60 tree_statement_list *cleanup (void) { return catch_code; } 58 tree_statement_list *cleanup (void) { return catch_code; }
61 59
114 : tree_command (l, c), unwind_protect_code (tc), cleanup_code (cc), 112 : tree_command (l, c), unwind_protect_code (tc), cleanup_code (cc),
115 lead_comm (cl), mid_comm (cm), trail_comm (ct) { } 113 lead_comm (cl), mid_comm (cm), trail_comm (ct) { }
116 114
117 ~tree_unwind_protect_command (void); 115 ~tree_unwind_protect_command (void);
118 116
119 void eval (void);
120
121 tree_statement_list *body (void) { return unwind_protect_code; } 117 tree_statement_list *body (void) { return unwind_protect_code; }
122 118
123 tree_statement_list *cleanup (void) { return cleanup_code; } 119 tree_statement_list *cleanup (void) { return cleanup_code; }
124 120
125 octave_comment_list *leading_comment (void) { return lead_comm; } 121 octave_comment_list *leading_comment (void) { return lead_comm; }