Mercurial > octave

annotate src/pt.h @ 2991:fc751d2a99fd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1997-05-16 21:00:48 by jwe]
author jwe
date Fri, 16 May 1997 21:00:49 +0000
parents ae20b3f37f5e
children d14c483b3c12
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2987
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
1 /*
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
2
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
3 Copyright (C) 1996, 1997 John W. Eaton
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
4
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
5 This file is part of Octave.
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
6
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
7 Octave is free software; you can redistribute it and/or modify it
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
8 under the terms of the GNU General Public License as published by the
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
9 Free Software Foundation; either version 2, or (at your option) any
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
10 later version.
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
11
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
12 Octave is distributed in the hope that it will be useful, but WITHOUT
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
15 for more details.
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
16
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
18 along with Octave; see the file COPYING. If not, write to the Free
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
19 Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
20
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
21 */
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
22
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
23 #if !defined (octave_tree_h)
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
24 #define octave_tree_h 1
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
25
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
26 #if defined (__GNUG__)
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
27 #pragma interface
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
28 #endif
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
29
2991
fc751d2a99fd [project @ 1997-05-16 21:00:48 by jwe]
jwe
parents: 2987
diff changeset
30 #include <string>
fc751d2a99fd [project @ 1997-05-16 21:00:48 by jwe]
jwe
parents: 2987
diff changeset
31
fc751d2a99fd [project @ 1997-05-16 21:00:48 by jwe]
jwe
parents: 2987
diff changeset
32 class ostream;
fc751d2a99fd [project @ 1997-05-16 21:00:48 by jwe]
jwe
parents: 2987
diff changeset
33
2987
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
34 class tree_walker;
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
35
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
36 // Base class for the parse tree.
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
37
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
38 class
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
39 tree
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
40 {
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
41 public:
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
42
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
43 tree (int l = -1, int c = -1)
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
44 {
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
45 line_num = l;
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
46 column_num = c;
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
47 }
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
48
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
49 virtual ~tree (void) { }
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
50
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
51 virtual int line (void) const
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
52 { return line_num; }
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
53
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
54 virtual int column (void) const
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
55 { return column_num; }
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
56
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
57 virtual void accept (tree_walker& tw) = 0;
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
58
2991
fc751d2a99fd [project @ 1997-05-16 21:00:48 by jwe]
jwe
parents: 2987
diff changeset
59 string str_print_code (void);
fc751d2a99fd [project @ 1997-05-16 21:00:48 by jwe]
jwe
parents: 2987
diff changeset
60
2987
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
61 private:
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
62
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
63 // The input line and column where we found the text that was
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
64 // eventually converted to this tree node.
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
65 int line_num;
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
66 int column_num;
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
67
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
68 // No copying!
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
69
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
70 tree (const tree&);
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
71
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
72 tree& operator = (const tree&);
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
73 };
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
74
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
75 #endif
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
76
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
77 /*
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
78 ;;; Local Variables: ***
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
79 ;;; mode: C++ ***
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
80 ;;; End: ***
ae20b3f37f5e [project @ 1997-05-16 07:05:15 by jwe]
jwe
parents:
diff changeset
81 */