annotate libinterp/parse-tree/pt-pr-code.h @ 23615:be7b884ac589

use version number in OCTAVE_DEPRECATED macro * mk-octave-config-h.sh, oct-conf-post.in.h (OCTAVE_DEPRECATED): New argument, VER, to record and display version number in which the object was marked as deprecated. Change all uses.
author John W. Eaton <jwe@octave.org>
date Fri, 16 Jun 2017 09:19:20 -0400
parents db947ba52118
children ea879bc55272
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
1 /*
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
2
23219
3ac9f9ecfae5 maint: Update copyright dates.
John W. Eaton <jwe@octave.org>
parents: 23083
diff changeset
3 Copyright (C) 1996-2017 John W. Eaton
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
4
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
5 This file is part of Octave.
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
6
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
7 Octave is free software; you can redistribute it and/or modify it
22755
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
8 under the terms of the GNU General Public License as published by
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
9 the Free Software Foundation; either version 3 of the License, or
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
10 (at your option) any later version.
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
11
22755
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
12 Octave is distributed in the hope that it will be useful, but
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
13 WITHOUT ANY WARRANTY; without even the implied warranty of
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
15 GNU General Public License for more details.
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
16
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
7016
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 5861
diff changeset
18 along with Octave; see the file COPYING. If not, see
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 5861
diff changeset
19 <http://www.gnu.org/licenses/>.
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
20
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
21 */
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
22
20791
f7084eae3318 maint: Use Octave coding conventions for #if statements.
Rik <rik@octave.org>
parents: 19697
diff changeset
23 #if ! defined (octave_pt_pr_code_h)
17822
ebb3ef964372 maint: Use common #define syntax "octave_filename_h" in h_files.
Rik <rik@octave.org>
parents: 17744
diff changeset
24 #define octave_pt_pr_code_h 1
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
25
21244
1473547f50f5 include octave-config.h in public header files
John W. Eaton <jwe@octave.org>
parents: 21017
diff changeset
26 #include "octave-config.h"
1473547f50f5 include octave-config.h in public header files
John W. Eaton <jwe@octave.org>
parents: 21017
diff changeset
27
4676
c0aa75a64635 [project @ 2003-12-16 16:47:52 by jwe]
jwe
parents: 4342
diff changeset
28 #include <stack>
2530
64f403ef483d [project @ 1996-11-19 18:06:02 by jwe]
jwe
parents: 2372
diff changeset
29 #include <string>
64f403ef483d [project @ 1996-11-19 18:06:02 by jwe]
jwe
parents: 2372
diff changeset
30
3665
0689afb1d001 [project @ 2000-05-11 19:07:56 by jwe]
jwe
parents: 3523
diff changeset
31 #include "comment-list.h"
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
32 #include "pt-walk.h"
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
33
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
34 namespace octave
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
35 {
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
36 class tree_decl_command;
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
37 class tree_expression;
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
38
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
39 // How to print the code that the parse trees represent.
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
40
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
41 class tree_print_code : public tree_walker
4676
c0aa75a64635 [project @ 2003-12-16 16:47:52 by jwe]
jwe
parents: 4342
diff changeset
42 {
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
43 public:
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
44
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
45 tree_print_code (std::ostream& os_arg,
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
46 const std::string& pfx = "",
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
47 bool pr_orig_txt = true)
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
48 : os (os_arg), prefix (pfx), nesting (),
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
49 print_original_text (pr_orig_txt),
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
50 curr_print_indent_level (0), beginning_of_line (true),
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
51 suppress_newlines (0)
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
52 {
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
53 // For "none".
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
54 nesting.push ('n');
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
55 }
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
56
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
57 // No copying!
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
58
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
59 tree_print_code (const tree_print_code&) = delete;
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
60
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
61 tree_print_code& operator = (const tree_print_code&) = delete;
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
62
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
63 ~tree_print_code (void) = default;
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
64
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
65 void visit_anon_fcn_handle (tree_anon_fcn_handle&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
66
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
67 void visit_argument_list (tree_argument_list&);
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
68
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
69 void visit_binary_expression (tree_binary_expression&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
70
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
71 void visit_break_command (tree_break_command&);
8658
73c4516fae10 New evaluator and debugger derived from tree-walker class
John W. Eaton <jwe@octave.org>
parents: 7715
diff changeset
72
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
73 void visit_colon_expression (tree_colon_expression&);
2846
52e7c4509983 [project @ 1997-03-26 23:27:35 by jwe]
jwe
parents: 2764
diff changeset
74
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
75 void visit_continue_command (tree_continue_command&);
2846
52e7c4509983 [project @ 1997-03-26 23:27:35 by jwe]
jwe
parents: 2764
diff changeset
76
23469
2699c5974844 handle global and persistent in tree_decl_command, not as separate classes
John W. Eaton <jwe@octave.org>
parents: 23220
diff changeset
77 void visit_decl_command (tree_decl_command&);
2846
52e7c4509983 [project @ 1997-03-26 23:27:35 by jwe]
jwe
parents: 2764
diff changeset
78
23469
2699c5974844 handle global and persistent in tree_decl_command, not as separate classes
John W. Eaton <jwe@octave.org>
parents: 23220
diff changeset
79 void visit_decl_init_list (tree_decl_init_list&);
2969
1b47dd00a831 [project @ 1997-05-15 17:57:48 by jwe]
jwe
parents: 2961
diff changeset
80
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
81 void visit_decl_elt (tree_decl_elt&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
82
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
83 void visit_simple_for_command (tree_simple_for_command&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
84
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
85 void visit_complex_for_command (tree_complex_for_command&);
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
86
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
87 void visit_octave_user_script (octave_user_script&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
88
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
89 void visit_octave_user_function (octave_user_function&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
90
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
91 void visit_octave_user_function_header (octave_user_function&);
7715
5b4d278ec828 parse scripts completely before executing
John W. Eaton <jwe@octave.org>
parents: 7017
diff changeset
92
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
93 void visit_octave_user_function_trailer (octave_user_function&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
94
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
95 void visit_function_def (tree_function_def&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
96
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
97 void visit_identifier (tree_identifier&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
98
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
99 void visit_if_clause (tree_if_clause&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
100
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
101 void visit_if_command (tree_if_command&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
102
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
103 void visit_if_command_list (tree_if_command_list&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
104
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
105 void visit_index_expression (tree_index_expression&);
3351
8623649c967c [project @ 1999-11-15 16:17:01 by jwe]
jwe
parents: 3165
diff changeset
106
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
107 void visit_matrix (tree_matrix&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
108
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
109 void visit_cell (tree_cell&);
2620
5c773d4745d6 [project @ 1997-01-23 16:26:25 by jwe]
jwe
parents: 2530
diff changeset
110
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
111 void visit_multi_assignment (tree_multi_assignment&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
112
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
113 void visit_no_op_command (tree_no_op_command&);
4342
813effe14ee1 [project @ 2003-02-20 08:35:55 by jwe]
jwe
parents: 4207
diff changeset
114
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
115 void visit_constant (tree_constant&);
15035
a820a990968e new tree_funcall class
John W. Eaton <jwe@octave.org>
parents: 14294
diff changeset
116
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
117 void visit_fcn_handle (tree_fcn_handle&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
118
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
119 void visit_funcall (tree_funcall&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
120
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
121 void visit_parameter_list (tree_parameter_list&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
122
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
123 void visit_postfix_expression (tree_postfix_expression&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
124
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
125 void visit_prefix_expression (tree_prefix_expression&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
126
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
127 void visit_return_command (tree_return_command&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
128
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
129 void visit_return_list (tree_return_list&);
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
130
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
131 void visit_simple_assignment (tree_simple_assignment&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
132
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
133 void visit_statement (tree_statement&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
134
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
135 void visit_statement_list (tree_statement_list&);
2846
52e7c4509983 [project @ 1997-03-26 23:27:35 by jwe]
jwe
parents: 2764
diff changeset
136
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
137 void visit_switch_case (tree_switch_case&);
2846
52e7c4509983 [project @ 1997-03-26 23:27:35 by jwe]
jwe
parents: 2764
diff changeset
138
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
139 void visit_switch_case_list (tree_switch_case_list&);
2846
52e7c4509983 [project @ 1997-03-26 23:27:35 by jwe]
jwe
parents: 2764
diff changeset
140
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
141 void visit_switch_command (tree_switch_command&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
142
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
143 void visit_try_catch_command (tree_try_catch_command&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
144
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
145 void visit_unwind_protect_command (tree_unwind_protect_command&);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
146
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
147 void visit_while_command (tree_while_command&);
3484
8b1f46ac2b64 [project @ 2000-01-27 23:30:45 by jwe]
jwe
parents: 3351
diff changeset
148
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
149 void visit_do_until_command (tree_do_until_command&);
4980
003bbf6c13d8 [project @ 2004-09-09 15:47:17 by jwe]
jwe
parents: 4676
diff changeset
150
23600
db947ba52118 explicitly limit anonymous functions to a single expression
John W. Eaton <jwe@octave.org>
parents: 23469
diff changeset
151 void print_fcn_handle_body (tree_expression *);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
152
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
153 private:
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
154
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
155 std::ostream& os;
2530
64f403ef483d [project @ 1996-11-19 18:06:02 by jwe]
jwe
parents: 2372
diff changeset
156
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
157 std::string prefix;
4676
c0aa75a64635 [project @ 2003-12-16 16:47:52 by jwe]
jwe
parents: 4342
diff changeset
158
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
159 std::stack<char> nesting;
2530
64f403ef483d [project @ 1996-11-19 18:06:02 by jwe]
jwe
parents: 2372
diff changeset
160
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
161 bool print_original_text;
3708
9b9efdcbdfd3 [project @ 2000-07-28 20:50:58 by jwe]
jwe
parents: 3665
diff changeset
162
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
163 // Current indentation.
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
164 int curr_print_indent_level;
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
165
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
166 // TRUE means we are at the beginning of a line.
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
167 bool beginning_of_line;
4980
003bbf6c13d8 [project @ 2004-09-09 15:47:17 by jwe]
jwe
parents: 4676
diff changeset
168
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
169 // Nonzero means we are not printing newlines and indenting.
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
170 int suppress_newlines;
8658
73c4516fae10 New evaluator and debugger derived from tree-walker class
John W. Eaton <jwe@octave.org>
parents: 7715
diff changeset
171
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
172 void reset_indent_level (void) { curr_print_indent_level = 0; }
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
173
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
174 void increment_indent_level (void) { curr_print_indent_level += 2; }
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
175
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
176 void decrement_indent_level (void) { curr_print_indent_level -= 2; }
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
177
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
178 void newline (const char *alt_txt = ", ");
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
179
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
180 void indent (void);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
181
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
182 void reset (void);
2961
8a77d52c9d02 [project @ 1997-05-12 01:36:04 by jwe]
jwe
parents: 2960
diff changeset
183
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
184 void print_parens (const tree_expression& expr, const char *txt);
3665
0689afb1d001 [project @ 2000-05-11 19:07:56 by jwe]
jwe
parents: 3523
diff changeset
185
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
186 void print_comment_list (octave_comment_list *comment_list);
3665
0689afb1d001 [project @ 2000-05-11 19:07:56 by jwe]
jwe
parents: 3523
diff changeset
187
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
188 void print_comment_elt (const octave_comment_elt& comment_elt);
3665
0689afb1d001 [project @ 2000-05-11 19:07:56 by jwe]
jwe
parents: 3523
diff changeset
189
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
190 void print_indented_comment (octave_comment_list *comment_list);
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
191
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
192 // Must create with an output stream!
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
193
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
194 tree_print_code (void);
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
195 };
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
196 }
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
197
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
198 #if defined (OCTAVE_USE_DEPRECATED_FUNCTIONS)
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
199
23615
be7b884ac589 use version number in OCTAVE_DEPRECATED macro
John W. Eaton <jwe@octave.org>
parents: 23600
diff changeset
200 OCTAVE_DEPRECATED (4.4, "use 'octave::tree_print_code' instead")
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
201 typedef octave::tree_print_code tree_print_code;
2123
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
202
ee55d81f585a [project @ 1996-05-12 07:16:36 by jwe]
jwe
parents:
diff changeset
203 #endif
22407
34ce5be04942 maint: Style check C++ code in libinterp/.
Rik <rik@octave.org>
parents: 22323
diff changeset
204
23075
4e3d47dc7e25 move parse tree classes inside octave namespace
John W. Eaton <jwe@octave.org>
parents: 22869
diff changeset
205 #endif