--- 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 @@
 <il_st_state>{
 {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;
 
 
 	/************************/