瀏覽代碼

* 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);