* C contant size specifiers can be lower cased as well:

0x12341234u is allowed

utils/h2pas/h2pas.pas

@@ -7857,7 +7857,11 @@ end.
 
 {
   $Log$
-  Revision 1.3  2001-04-10 21:22:37  peter
+  Revision 1.4  2001-08-17 22:47:30  florian
+    * C contant size specifiers can be lower cased as well:
+      0x12341234u is allowed
+
+  Revision 1.3  2001/04/10 21:22:38  peter
     * more fixes that were still laying around
 
   Revision 1.2  2000/12/27 21:59:59  peter

utils/h2pas/scan.l

@@ -443,12 +443,12 @@ D [0-9]
                           return(CSTRING)
                         else
                           return(256);
-{D}*[U]?[L]?            begin
-                           if yytext[length(yytext)] in ['L','U'] then
+{D}*[Uu]?[Ll]?          begin
+                           while yytext[length(yytext)] in ['L','U','l','u'] do
                              Delete(yytext,length(yytext),1);
                            return(NUMBER);
                         end;
-"0x"[0-9A-Fa-f]*[U]?[L]?
+"0x"[0-9A-Fa-f]*[Uu]?[Ll]?
                         begin
                            (* handle pre- and postfixes *)
                            if copy(yytext,1,2)='0x' then
@@ -456,7 +456,7 @@ D [0-9]
                                 delete(yytext,1,2);
                                 yytext:='$'+yytext;
                              end;
-                           if yytext[length(yytext)] in ['L','U'] then
+                           while yytext[length(yytext)] in ['L','U','l','u'] do
                              Delete(yytext,length(yytext),1);
                            return(NUMBER);
                         end;