Explorar o código

fcl-passrc: adaptions for pas2js

git-svn-id: trunk@39968 -
Mattias Gaertner %!s(int64=7) %!d(string=hai) anos
pai
achega
27ec656ab7
Modificáronse 1 ficheiros con 4 adicións e 0 borrados
  1. 4 0
      packages/fcl-passrc/src/pasresolveeval.pas

+ 4 - 0
packages/fcl-passrc/src/pasresolveeval.pas

@@ -61,6 +61,10 @@ unit PasResolveEval;
 
 {$mode objfpc}{$H+}
 
+{$ifdef fpc}
+  {$define UsePChar}
+{$endif}
+
 {$IFOPT Q+}{$DEFINE OverflowCheckOn}{$ENDIF}
 {$IFOPT R+}{$DEFINE RangeCheckOn}{$ENDIF}