Index: src/Parser/lex.ll
===================================================================
--- src/Parser/lex.ll	(revision b6b3c42f415adcec079dd0d227f2ce609a0f0198)
+++ src/Parser/lex.ll	(revision 63958172b04a92229dd3d55d9e3a2d04452e9c65)
@@ -10,6 +10,6 @@
  * Created On       : Sat Sep 22 08:58:10 2001
  * Last Modified By : Peter A. Buhr
- * Last Modified On : Sat Sep 23 17:29:28 2017
- * Update Count     : 632
+ * Last Modified On : Wed Oct 25 12:19:27 2017
+ * Update Count     : 633
  */
 
@@ -233,5 +233,5 @@
 __extension__	{ KEYWORD_RETURN(EXTENSION); }			// GCC
 extern			{ KEYWORD_RETURN(EXTERN); }
-fallthrough		{ KEYWORD_RETURN(FALLTHRU); }			// CFA
+fallthrough		{ KEYWORD_RETURN(FALLTHROUGH); }		// CFA
 fallthru		{ KEYWORD_RETURN(FALLTHRU); }			// CFA
 finally			{ KEYWORD_RETURN(FINALLY); }			// CFA
Index: src/Parser/parser.yy
===================================================================
--- src/Parser/parser.yy	(revision b6b3c42f415adcec079dd0d227f2ce609a0f0198)
+++ src/Parser/parser.yy	(revision 63958172b04a92229dd3d55d9e3a2d04452e9c65)
@@ -10,6 +10,6 @@
 // Created On       : Sat Sep  1 20:22:55 2001
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Mon Oct 16 11:07:29 2017
-// Update Count     : 2892
+// Last Modified On : Wed Oct 25 12:28:54 2017
+// Update Count     : 2893
 //
 
@@ -180,5 +180,5 @@
 %token ATTRIBUTE EXTENSION								// GCC
 %token IF ELSE SWITCH CASE DEFAULT DO WHILE FOR BREAK CONTINUE GOTO RETURN
-%token CHOOSE DISABLE ENABLE FALLTHRU TRY CATCH CATCHRESUME FINALLY THROW THROWRESUME AT WITH WHEN WAITFOR // CFA
+%token CHOOSE DISABLE ENABLE FALLTHRU FALLTHROUGH TRY CATCH CATCHRESUME FINALLY THROW THROWRESUME AT WITH WHEN WAITFOR // CFA
 %token ASM												// C99, extension ISO/IEC 9899:1999 Section J.5.10(1)
 %token ALIGNAS ALIGNOF GENERIC STATICASSERT				// C11
@@ -362,5 +362,5 @@
 %precedence ELSE	// token precedence for start of else clause in IF/WAITFOR statement
 
-%locations
+%locations			// support location tracking for error messages
 
 %start translation_unit									// parse-tree root
@@ -974,8 +974,13 @@
 	;
 
+fall_through_name:										// CFA
+	FALLTHRU
+	| FALLTHROUGH
+	;
+
 fall_through:											// CFA
-	FALLTHRU
+	fall_through_name
 		{ $$ = nullptr; }
-	| FALLTHRU ';'
+	| fall_through_name ';'
 		{ $$ = nullptr; }
 	;
@@ -2486,4 +2491,6 @@
 	| TYPEDEFname
 	| TYPEGENname
+	| FALLTHROUGH
+		{ $$ = Token{ new string( "fallthrough" ), { nullptr, -1 } }; }
 	| CONST
 		{ $$ = Token{ new string( "__const__" ), { nullptr, -1 } }; }
@@ -2751,5 +2758,5 @@
 //
 //		typedef int foo;
-//		forall( otype T ) foo( T );
+//		forall( otype T ) struct foo;
 //		int f( int foo ); // redefine typedef name in new scope
 //