Index: src/Parser/lex.ll
===================================================================
--- src/Parser/lex.ll	(revision 0213af6e433b0c6065936c860490322e54cd7df6)
+++ src/Parser/lex.ll	(revision ba2356b7d4eb09a1a6fdad29b0b0dc5d4038829d)
@@ -10,6 +10,6 @@
  * Created On       : Sat Sep 22 08:58:10 2001
  * Last Modified By : Peter A. Buhr
- * Last Modified On : Wed May 17 21:37:51 2017
- * Update Count     : 510
+ * Last Modified On : Thu May 18 09:03:49 2017
+ * Update Count     : 513
  */
 
@@ -77,5 +77,5 @@
 				// numeric constants, CFA: '_' in constant
 hex_quad {hex}("_"?{hex}){3}
-integer_suffix "_"?(([uU][lL]?[lL]?[iI]?)|([uU][iI]?[lL]?[lL]?)|([lL][lL]?[uU]?[iI]?)|([iI][lL]?[lL]?[uU]?))
+integer_suffix "_"?(([uU](("ll"|"LL"|[lL])[iI]|[iI]?("ll"|"LL"|[lL])?))|([iI](("ll"|"LL"|[lL])[uU]|[uU]?("ll"|"LL"|[lL])?))|(("ll"|"LL"|[lL])([iI][uU]|[uU]?[iI]?)))
 
 octal_digits ({octal})|({octal}({octal}|"_")*{octal})
@@ -95,7 +95,6 @@
 real_constant {decimal_digits}{real_fraction}
 exponent "_"?[eE]"_"?[+-]?{decimal_digits}
-				// GCC: D (double), DL (long double) and iI (imaginary) suffixes
-floating_suffix "_"?([fFdDlL][iI]?|"DL"|[iI][lLfFdD]?)
-				//floating_suffix "_"?([fFdD]|[lL]|[D][L])|([iI][lLfFdD])|([lLfFdD][iI]))
+				// GCC: D (double) and iI (imaginary) suffixes, and DL (long double)
+floating_suffix "_"?([fFdDlL][iI]?|[iI][lLfFdD]?|"DL")
 floating_constant (({real_constant}{exponent}?)|({decimal_digits}{exponent})){floating_suffix}?