Преглед на файлове

fcl-passrc: adaptions for pas2js

git-svn-id: trunk@39968 -
Mattias Gaertner преди 6 години
родител
ревизия
27ec656ab7
променени са 1 файла, в които са добавени 4 реда и са изтрити 0 реда
  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}