Index: src/Parser/lex.ll
===================================================================
--- src/Parser/lex.ll	(revision 01b8ccf1f41720d01299184f779aec0c33ce15fb)
+++ src/Parser/lex.ll	(revision 637dd9c6c6f1e227e65a024443938074659ae04c)
@@ -10,6 +10,6 @@
  * Created On       : Sat Sep 22 08:58:10 2001
  * Last Modified By : Peter A. Buhr
- * Last Modified On : Sun Apr 29 14:10:49 2018
- * Update Count     : 675
+ * Last Modified On : Thu May  3 13:42:40 2018
+ * Update Count     : 676
  */
 
@@ -174,5 +174,5 @@
 }
 
-				/* ignore preprocessor-style directives (for now) */
+				/* preprocessor-style directives */
 ^{h_white}*"#"[^\n]*"\n" { RETURN_VAL( DIRECTIVE ); }
 
Index: src/Parser/parser.yy
===================================================================
--- src/Parser/parser.yy	(revision 01b8ccf1f41720d01299184f779aec0c33ce15fb)
+++ src/Parser/parser.yy	(revision 637dd9c6c6f1e227e65a024443938074659ae04c)
@@ -10,6 +10,6 @@
 // Created On       : Sat Sep  1 20:22:55 2001
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Mon Apr 30 09:20:47 2018
-// Update Count     : 3207
+// Last Modified On : Thu May  3 08:20:09 2018
+// Update Count     : 3225
 //
 
@@ -2451,5 +2451,6 @@
 	| declaration_qualifier_list type_qualifier_list
 		{
-			if ( $1->type->forall ) xxx = forall = true; // remember generic type
+			// forall must be in the type_qualifier_list
+			if ( $2->type->forall ) xxx = forall = true; // remember generic type
 		}
 	  push '{' external_definition_list '}'				// CFA, namespace
