GNU Octave  4.0.0
A high-level interpreted language, primarily intended for numerical computations, mostly compatible with Matlab
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Properties Friends Macros Pages
pt-jump.cc
Go to the documentation of this file.
1 /*
2 
3 Copyright (C) 1996-2015 John W. Eaton
4 
5 This file is part of Octave.
6 
7 Octave is free software; you can redistribute it and/or modify it
8 under the terms of the GNU General Public License as published by the
9 Free Software Foundation; either version 3 of the License, or (at your
10 option) any later version.
11 
12 Octave is distributed in the hope that it will be useful, but WITHOUT
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
15 for more details.
16 
17 You should have received a copy of the GNU General Public License
18 along with Octave; see the file COPYING. If not, see
19 <http://www.gnu.org/licenses/>.
20 
21 */
22 
23 #ifdef HAVE_CONFIG_H
24 #include <config.h>
25 #endif
26 
27 #include "error.h"
28 #include "oct-obj.h"
29 #include "pt-bp.h"
30 #include "pt-jump.h"
31 #include "pt-walk.h"
32 
33 class octave_value_list;
34 
35 // Break.
36 
37 // Nonzero means we're breaking out of a loop or function body.
39 
43 {
44  return new tree_break_command (line (), column ());
45 }
46 
47 void
49 {
50  tw.visit_break_command (*this);
51 }
52 
53 // Continue.
54 
55 // Nonzero means we're jumping to the end of a loop.
57 
61 {
62  return new tree_continue_command (line (), column ());
63 }
64 
65 void
67 {
68  tw.visit_continue_command (*this);
69 }
70 
71 // Return.
72 
73 // Nonzero means we're returning from a function.
75 
79 {
80  return new tree_return_command (line (), column ());
81 }
82 
83 void
85 {
86  tw.visit_return_command (*this);
87 }
void accept(tree_walker &tw)
Definition: pt-jump.cc:84
tree_command * dup(symbol_table::scope_id scope, symbol_table::context_id context) const
Definition: pt-jump.cc:77
void accept(tree_walker &tw)
Definition: pt-jump.cc:66
static int continuing
Definition: pt-jump.h:76
virtual void visit_continue_command(tree_continue_command &)=0
void accept(tree_walker &tw)
Definition: pt-jump.cc:48
static int breaking
Definition: pt-jump.h:48
virtual void visit_break_command(tree_break_command &)=0
tree_command * dup(symbol_table::scope_id scope, symbol_table::context_id context) const
Definition: pt-jump.cc:59
tree_command * dup(symbol_table::scope_id scope, symbol_table::context_id context) const
Definition: pt-jump.cc:41
tree_continue_command(int l=-1, int c=-1)
Definition: pt-jump.h:66
tree_return_command(int l=-1, int c=-1)
Definition: pt-jump.h:94
static int returning
Definition: pt-jump.h:104
virtual void visit_return_command(tree_return_command &)=0
virtual int column(void) const
Definition: pt.h:47
tree_break_command(int l=-1, int c=-1)
Definition: pt-jump.h:38