2
0
Эх сурвалжийг харах

fcl-passrc: fixed compile with pas2js

git-svn-id: trunk@46809 -
Mattias Gaertner 5 жил өмнө
parent
commit
0f466cbed7

+ 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,