浏览代码

* fcl-db: sql parser: correct hex error message

git-svn-id: trunk@27890 -
reiniero 11 年之前
父节点
当前提交
da91ac9726
共有 2 个文件被更改,包括 3 次插入3 次删除
  1. 2 2
      packages/fcl-db/src/sql/fpsqlparser.pas
  2. 1 1
      packages/fcl-db/src/sql/fpsqlscanner.pp

+ 2 - 2
packages/fcl-db/src/sql/fpsqlparser.pas

@@ -3829,8 +3829,8 @@ end;
 
 function TSQLParser.ParseScript(AllowPartial : Boolean = False): TSQLElementList;
 
-Var
-   E : TSQLElement;
+var
+  E : TSQLElement;
 
 begin
   Result:=TSQLElementList.Create(True);

+ 1 - 1
packages/fcl-db/src/sql/fpsqlscanner.pp

@@ -29,7 +29,7 @@ resourcestring
   SErrIfXXXNestingLimitReached = 'Nesting of $IFxxx too deep';
   SErrInvalidPPElse = '$ELSE without matching $IFxxx';
   SErrInvalidPPEndif = '$ENDIF without matching $IFxxx';
-  SInvalidHexadecimalNumber = 'Invalid decimal number';
+  SInvalidHexadecimalNumber = 'Invalid hexadecimal number';
   SErrInvalidNonEqual = 'SyntaxError: != or !== expected';
   SBarExpected = '| character expected';