* Restored test unit

packages/fcl-json/tests/testjson2code.lpi

@@ -38,7 +38,7 @@
         <PackageName Value="FCL"/>
       </Item1>
     </RequiredPackages>
-    <Units Count="2">
+    <Units Count="3">
       <Unit0>
         <Filename Value="testjson2code.lpr"/>
         <IsPartOfProject Value="True"/>
@@ -47,6 +47,10 @@
         <Filename Value="../src/fpjsontopas.pp"/>
         <IsPartOfProject Value="True"/>
       </Unit1>
+      <Unit2>
+        <Filename Value="tcjsontocode.pas"/>
+        <IsPartOfProject Value="True"/>
+      </Unit2>
     </Units>
   </ProjectOptions>
   <CompilerOptions>

packages/fcl-json/tests/testjson2code.lpr

@@ -3,7 +3,7 @@ program testjson2code;
 {$mode objfpc}{$H+}
 
 uses
-  Classes, consoletestrunner, fpjsontopas;
+  Classes, consoletestrunner, fpjsontopas, tcjsontocode;
 
 type