Mercurial > octave

comparison src/pt-jump.cc @ 4207:fa3482b34599

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2002-12-03 18:22:05 by jwe]
author jwe
date Tue, 03 Dec 2002 18:22:51 +0000
parents 5719210fff4c
children e35b034d3523
comparison
equal deleted inserted replaced
4206:fc514e47666e 4207:fa3482b34599
37 class octave_value_list; 37 class octave_value_list;
38 38
39 // Break. 39 // Break.
40 40
41 // Nonzero means we're breaking out of a loop or function body. 41 // Nonzero means we're breaking out of a loop or function body.
42 int tree_break_expression::breaking = 0; 42 int tree_break_command::breaking = 0;
43 43
44 octave_value 44 void
45 tree_break_expression::rvalue (void) 45 tree_break_command::eval (void)
46 { 46 {
47 // Even if we have an error we should still enter debug mode. 47 // Even if we have an error we should still enter debug mode.
48 MAYBE_DO_BREAKPOINT; 48 MAYBE_DO_BREAKPOINT;
49 49
50 if (! error_state) 50 if (! error_state)
51 breaking = 1; 51 breaking = 1;
52
53 return true;
54 } 52 }
55 53
56 void 54 void
57 tree_break_expression::accept (tree_walker& tw) 55 tree_break_command::accept (tree_walker& tw)
58 { 56 {
59 tw.visit_break_expression (*this); 57 tw.visit_break_command (*this);
60 } 58 }
61 59
62 // Continue. 60 // Continue.
63 61
64 // Nonzero means we're jumping to the end of a loop. 62 // Nonzero means we're jumping to the end of a loop.
65 int tree_continue_expression::continuing = 0; 63 int tree_continue_command::continuing = 0;
66 64
67 octave_value 65 void
68 tree_continue_expression::rvalue (void) 66 tree_continue_command::eval (void)
69 { 67 {
70 MAYBE_DO_BREAKPOINT; 68 MAYBE_DO_BREAKPOINT;
71 69
72 if (! error_state) 70 if (! error_state)
73 continuing = 1; 71 continuing = 1;
74
75 return true;
76 } 72 }
77 73
78 void 74 void
79 tree_continue_expression::accept (tree_walker& tw) 75 tree_continue_command::accept (tree_walker& tw)
80 { 76 {
81 tw.visit_continue_expression (*this); 77 tw.visit_continue_command (*this);
82 } 78 }
83 79
84 // Return. 80 // Return.
85 81
86 // Nonzero means we're returning from a function. Global because it 82 // Nonzero means we're returning from a function. Global because it
87 // is also needed in tree-expr.cc. 83 // is also needed in tree-expr.cc.
88 int tree_return_expression::returning = 0; 84 int tree_return_command::returning = 0;
89 85
90 octave_value 86 void
91 tree_return_expression::rvalue (void) 87 tree_return_command::eval (void)
92 { 88 {
93 MAYBE_DO_BREAKPOINT; 89 MAYBE_DO_BREAKPOINT;
94 90
95 if (! error_state) 91 if (! error_state)
96 returning = 1; 92 returning = 1;
97
98 return true;
99 } 93 }
100 94
101 void 95 void
102 tree_return_expression::accept (tree_walker& tw) 96 tree_return_command::accept (tree_walker& tw)
103 { 97 {
104 tw.visit_return_expression (*this); 98 tw.visit_return_command (*this);
105 } 99 }
106 100
107 /* 101 /*
108 ;;; Local Variables: *** 102 ;;; Local Variables: ***
109 ;;; mode: C++ *** 103 ;;; mode: C++ ***