Mercurial > octave
comparison src/pt-const.cc @ 5861:2a6cb4ed8f1e
[project @ 2006-06-16 05:09:41 by jwe]
author | jwe |
---|---|
date | Fri, 16 Jun 2006 05:09:42 +0000 |
parents | 4c8a2e4e0717 |
children | 47f4f4e88166 |
comparison
equal
deleted
inserted
replaced
5860:b645066d40ad | 5861:2a6cb4ed8f1e |
---|---|
68 retval = rvalue (); | 68 retval = rvalue (); |
69 | 69 |
70 return retval; | 70 return retval; |
71 } | 71 } |
72 | 72 |
73 tree_expression * | |
74 tree_constant::dup (symbol_table *sym_tab) | |
75 { | |
76 tree_constant *new_tc | |
77 = new tree_constant (val, orig_text, line (), column ()); | |
78 | |
79 new_tc->copy_base (*this); | |
80 | |
81 return new_tc; | |
82 } | |
83 | |
73 void | 84 void |
74 tree_constant::accept (tree_walker& tw) | 85 tree_constant::accept (tree_walker& tw) |
75 { | 86 { |
76 tw.visit_constant (*this); | 87 tw.visit_constant (*this); |
77 } | 88 } |