Преглед на файлове

* fix from Jeff Pohlmeyer <[email protected]> for problem with
variables/parameters called l, L, u or U

Jonas Maebe преди 22 години
родител
ревизия
c38ebece5a
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      utils/h2pas/scan.l

+ 1 - 1
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);