Mercurial > octave-nkf
comparison src/pt-bp.cc @ 8831:71742f45571e
pt-bp.cc: call accept for function and script commands
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Fri, 20 Feb 2009 14:11:04 -0500 |
parents | 73c4516fae10 |
children | eb63fbe60fab |
comparison
equal
deleted
inserted
replaced
8830:fa981a053064 | 8831:71742f45571e |
---|---|
158 lst->accept (*this); | 158 lst->accept (*this); |
159 } | 159 } |
160 } | 160 } |
161 | 161 |
162 void | 162 void |
163 tree_breakpoint::visit_octave_user_script (octave_user_script&) | 163 tree_breakpoint::visit_octave_user_script (octave_user_script& fcn) |
164 { | 164 { |
165 panic_impossible (); | 165 tree_statement_list *cmd_list = fcn.body (); |
166 } | 166 |
167 | 167 if (cmd_list) |
168 void | 168 cmd_list->accept (*this); |
169 tree_breakpoint::visit_octave_user_function (octave_user_function&) | 169 } |
170 { | 170 |
171 panic_impossible (); | 171 void |
172 tree_breakpoint::visit_octave_user_function (octave_user_function& fcn) | |
173 { | |
174 tree_statement_list *cmd_list = fcn.body (); | |
175 | |
176 if (cmd_list) | |
177 cmd_list->accept (*this); | |
172 } | 178 } |
173 | 179 |
174 void | 180 void |
175 tree_breakpoint::visit_octave_user_function_header (octave_user_function&) | 181 tree_breakpoint::visit_octave_user_function_header (octave_user_function&) |
176 { | 182 { |