fcl-js: added include file

git-svn-id: trunk@45861 -

.gitattributes

@@ -3738,6 +3738,7 @@ packages/fcl-js/examples/fpjsmin.pp svneol=native#text/plain
 packages/fcl-js/examples/srcmapdump.lpi svneol=native#text/plain
 packages/fcl-js/examples/srcmapdump.lpr svneol=native#text/plain
 packages/fcl-js/fpmake.pp svneol=native#text/plain
+packages/fcl-js/src/fcl-js.inc svneol=native#text/plain
 packages/fcl-js/src/jsbase.pp svneol=native#text/plain
 packages/fcl-js/src/jsminifier.pp svneol=native#text/plain
 packages/fcl-js/src/jsparser.pp svneol=native#text/plain

packages/fcl-js/src/fcl-js.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}
+

packages/fcl-js/src/jswriter.pp

@@ -14,13 +14,9 @@
   **********************************************************************}
 unit jswriter;
 
-{$mode objfpc}{$H+}
-{ $DEFINE DEBUGJSWRITER}
-{AllowWriteln}
+{$i fcl-js.inc}
 
-{$if defined(fpc) or defined(NodeJS)}
-  {$define HasFileWriter}
-{$endif}
+{ $DEFINE DEBUGJSWRITER}
 
 interface