From 19ff8d01066f592e66d4c062eb809c8a98f8145b Mon Sep 17 00:00:00 2001 From: jaortega Date: Tue, 7 Nov 2000 04:32:23 +0000 Subject: fixed bug with future EQU symbol refs (pking) --- mixlib/mix_scanner.l | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'mixlib/mix_scanner.l') 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; -- cgit v1.2.3