diff options
author | jaortega <jaortega> | 2000-11-07 04:32:23 +0000 |
---|---|---|
committer | jaortega <jaortega> | 2000-11-07 04:32:23 +0000 |
commit | 19ff8d01066f592e66d4c062eb809c8a98f8145b (patch) | |
tree | d4b1796f4817dfe966b886f622b7b720577bcef7 /mixlib/mix_scanner.l | |
parent | 0b26bdea980ea0d7f5f644679ba1a8ca2abb2986 (diff) | |
download | mdk-19ff8d01066f592e66d4c062eb809c8a98f8145b.tar.gz mdk-19ff8d01066f592e66d4c062eb809c8a98f8145b.tar.bz2 |
fixed bug with future EQU symbol refs (pking)
Diffstat (limited to 'mixlib/mix_scanner.l')
-rw-r--r-- | mixlib/mix_scanner.l | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/mixlib/mix_scanner.l b/mixlib/mix_scanner.l index f740d10..b1d4a13 100644 --- a/mixlib/mix_scanner.l +++ b/mixlib/mix_scanner.l @@ -176,7 +176,7 @@ wexpr {expr}({fpart})?(,{expr}({fpart})?)* BEGIN (OP); } {flocsymbol}|{blocsymbol} RETURN_ERROR (MIX_PERR_UNEX_LOC, yytext); - {symbol}/{ws}+EQU { /* store symbol name for future definition */ + {symbol}/({ws}+EQU) { /* store symbol name for future definition */ symbol = g_strdup (yytext); if ( symbol == NULL ) { mix_parser_log_error (parser, MIX_PERR_INTERNAL, lineno, NULL, FALSE); @@ -263,7 +263,7 @@ wexpr {expr}({fpart})?(,{expr}({fpart})?)* gint def; if ( symbol == NULL ) RETURN_ERROR (MIX_PERR_MIS_SYM, NULL); value = mix_word_new (atol (yytext)); - def = mix_symbol_table_add (parser->symbol_table, symbol, value); + def = mix_parser_define_symbol_value (parser, symbol, value); if ( def == MIX_SYM_DUP ) RETURN_ERROR (MIX_PERR_DUP_SYMBOL, symbol); if ( def == MIX_SYM_LONG ) RETURN_ERROR (MIX_PERR_LONG_SYMBOL, symbol); ++lineno; |