Sfoglia il codice sorgente

fcl-passrc: adaptions for pas2js

git-svn-id: trunk@39968 -
Mattias Gaertner 7 anni fa
parent
commit
27ec656ab7
1 ha cambiato i file con 4 aggiunte e 0 eliminazioni
  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}