diff -r db9cadaab2ea -r 273d6d5cec9d stage1_2/iec.flex --- a/stage1_2/iec.flex Thu Aug 30 16:40:20 2007 +0200 +++ b/stage1_2/iec.flex Mon Sep 17 17:47:10 2007 +0200 @@ -770,6 +770,7 @@ { {st_whitespace_no_pragma} /* Eat any whitespace */ {qualified_identifier}{st_whitespace}":=" unput_text(0); BEGIN(st_state); +{direct_variable}{st_whitespace}":=" unput_text(0); BEGIN(st_state); {qualified_identifier}"[" unput_text(0); BEGIN(st_state); RETURN unput_text(0); BEGIN(st_state); @@ -899,9 +900,11 @@ /* B 1.2.1 - Numeric Literals */ /******************************/ TRUE return TRUE; -BOOL#1 return TRUE; +BOOL#1 return TRUE; +BOOL#TRUE return TRUE; FALSE return FALSE; -BOOL#0 return FALSE; +BOOL#0 return FALSE; +BOOL#FALSE return FALSE; /************************/