Mercurial > octave

comparison src/token.cc @ 1288:4acabfbdd381

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1995-04-28 20:23:04 by jwe]
author jwe
date Fri, 28 Apr 1995 20:31:13 +0000
parents b6360f2d4fa6
children db2ff37920d2
comparison
equal deleted inserted replaced
1287:3f49454bc68c 1288:4acabfbdd381
25 #include <config.h> 25 #include <config.h>
26 #endif 26 #endif
27 27
28 #include <assert.h> 28 #include <assert.h>
29 29
30 #include "error.h"
30 #include "token.h" 31 #include "token.h"
31 #include "utils.h" 32 #include "utils.h"
32 #include "symtab.h" 33 #include "symtab.h"
33 34
34 token::token (int l, int c) 35 token::token (int l, int c)
52 { 53 {
53 line_num = l; 54 line_num = l;
54 column_num = c; 55 column_num = c;
55 type_tag = double_token; 56 type_tag = double_token;
56 num = d; 57 num = d;
57 orig_text = strsave (s); 58 orig_text = 0; // strsave (s);
58 } 59 }
59 60
60 token::token (end_tok_type t, int l, int c) 61 token::token (end_tok_type t, int l, int c)
61 { 62 {
62 line_num = l; 63 line_num = l;
142 token::text_rep (void) 143 token::text_rep (void)
143 { 144 {
144 return orig_text; 145 return orig_text;
145 } 146 }
146 147
148 token::token (const token& tok)
149 {
150 panic_impossible ();
151 }
152
153 token&
154 operator = (const token& tok)
155 {
156 panic_impossible ();
157 }
158
147 /* 159 /*
148 ;;; Local Variables: *** 160 ;;; Local Variables: ***
149 ;;; mode: C++ *** 161 ;;; mode: C++ ***
150 ;;; page-delimiter: "^/\\*" *** 162 ;;; page-delimiter: "^/\\*" ***
151 ;;; End: *** 163 ;;; End: ***