Mercurial > hg > octave-jordi

comparison src/lex.l @ 120:5a7e0475450a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1993-09-21 20:34:09 by jwe] (lookup_identifier): Look in current scope first.
author jwe
date Tue, 21 Sep 1993 20:34:09 +0000
parents e122c49e9726
children 7849db4b6dbc
comparison
equal deleted inserted replaced
119:32de07939aa7 120:5a7e0475450a
1095 } 1095 }
1096 1096
1097 static symbol_record * 1097 static symbol_record *
1098 lookup_identifier (char *name) 1098 lookup_identifier (char *name)
1099 { 1099 {
1100 symbol_record *lsr = curr_sym_tab->lookup (name, 0, 0);
1101 if (lsr != (symbol_record *) NULL)
1102 return lsr;
1103
1100 symbol_record *gsr = global_sym_tab->lookup (name, 0, 0); 1104 symbol_record *gsr = global_sym_tab->lookup (name, 0, 0);
1101
1102 if (curr_sym_tab == top_level_sym_tab && gsr != (symbol_record *) NULL) 1105 if (curr_sym_tab == top_level_sym_tab && gsr != (symbol_record *) NULL)
1103 return gsr; 1106 return gsr;
1104 1107
1105 return curr_sym_tab->lookup (name, 1, 0); 1108 return curr_sym_tab->lookup (name, 1, 0);
1106 } 1109 }