* fix from Jeff Pohlmeyer <yetanothergeek@yahoo.com> for problem with

variables/parameters called l, L, u or U

utils/h2pas/scan.l

@@ -443,7 +443,7 @@ D [0-9]
                           return(CSTRING)
                         else
                           return(256);
-{D}*[Uu]?[Ll]?          begin
+{D}+[Uu]?[Ll]?          begin
                            while yytext[length(yytext)] in ['L','U','l','u'] do
                              Delete(yytext,length(yytext),1);
                            return(NUMBER);