Browse Source

fcl-passrc: fixed compile with pas2js

git-svn-id: trunk@46809 -
Mattias Gaertner 4 years ago
parent
commit
0f466cbed7
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/fcl-passrc/src/pasresolver.pp

+ 1 - 1
packages/fcl-passrc/src/pasresolver.pp

@@ -20264,7 +20264,7 @@ begin
     btAnsiChar: aName:='tkChar';
     {$endif}
     btWideChar: aName:='tkWChar';
-    btString: if BaseTypeString=btAnsiString then aName:='tkAString' else aName:='tkUString';
+    btString: {$ifdef FPC_HAS_CPSTRING}if BaseTypeString=btAnsiString then aName:='tkAString' else {$ENDIF}aName:='tkUString';
     {$ifdef FPC_HAS_CPSTRING}
     btAnsiString,
     btShortString,