Browse Source

fcl-json: added include file

git-svn-id: trunk@45860 -
Mattias Gaertner 5 years ago
parent
commit
86ee4a57c3
3 changed files with 12 additions and 2 deletions
  1. 1 0
      .gitattributes
  2. 9 0
      packages/fcl-json/src/fcl-json.inc
  3. 2 2
      packages/fcl-json/src/jsonreader.pp

+ 1 - 0
.gitattributes

@@ -3770,6 +3770,7 @@ packages/fcl-json/examples/simpledemo.lpi svneol=native#text/plain
 packages/fcl-json/examples/simpledemo.pp svneol=native#text/plain
 packages/fcl-json/fpmake.pp svneol=native#text/plain
 packages/fcl-json/src/README.txt svneol=native#text/plain
+packages/fcl-json/src/fcl-json.inc svneol=native#text/plain
 packages/fcl-json/src/fpjson.pp svneol=native#text/plain
 packages/fcl-json/src/fpjsonrtti.pp svneol=native#text/plain
 packages/fcl-json/src/fpjsontopas.pp svneol=native#text/plain

+ 9 - 0
packages/fcl-json/src/fcl-json.inc

@@ -0,0 +1,9 @@
+{$mode objfpc}{$H+}
+{$if defined(fpc) or defined(NodeJS)}
+  {$define HasFileWriter}
+{$endif}
+
+{$IF FPC_FULLVERSION>30100}
+  {$warn 6058 off} // cannot inline
+{$ENDIF}
+

+ 2 - 2
packages/fcl-json/src/jsonreader.pp

@@ -12,10 +12,10 @@
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
  **********************************************************************}
-{$mode objfpc}
-{$h+}
 unit jsonreader;
 
+{$I fcl-json.inc}
+
 interface
 
 uses