Browse Source

Rename test docat to tdocat to allow use inside testsuite

Pierre Muller 1 year ago
parent
commit
f04e92db39
2 changed files with 5 additions and 3 deletions
  1. 3 3
      packages/fcl-process/tests/tdocat.lpi
  2. 2 0
      packages/fcl-process/tests/tdocat.pp

+ 3 - 3
packages/fcl-process/tests/docat.lpi → packages/fcl-process/tests/tdocat.lpi

@@ -9,7 +9,7 @@
         <MainUnitHasScaledStatement Value="False"/>
         <MainUnitHasScaledStatement Value="False"/>
       </Flags>
       </Flags>
       <SessionStorage Value="InProjectDir"/>
       <SessionStorage Value="InProjectDir"/>
-      <Title Value="docat"/>
+      <Title Value="tdocat"/>
       <UseAppBundle Value="False"/>
       <UseAppBundle Value="False"/>
       <ResourceType Value="res"/>
       <ResourceType Value="res"/>
     </General>
     </General>
@@ -25,7 +25,7 @@
     </RunParams>
     </RunParams>
     <Units>
     <Units>
       <Unit>
       <Unit>
-        <Filename Value="docat.pp"/>
+        <Filename Value="tdocat.pp"/>
         <IsPartOfProject Value="True"/>
         <IsPartOfProject Value="True"/>
       </Unit>
       </Unit>
     </Units>
     </Units>
@@ -33,7 +33,7 @@
   <CompilerOptions>
   <CompilerOptions>
     <Version Value="11"/>
     <Version Value="11"/>
     <Target>
     <Target>
-      <Filename Value="docat"/>
+      <Filename Value="tdocat"/>
     </Target>
     </Target>
     <SearchPaths>
     <SearchPaths>
       <IncludeFiles Value="$(ProjOutDir)"/>
       <IncludeFiles Value="$(ProjOutDir)"/>

+ 2 - 0
packages/fcl-process/tests/docat.pp → packages/fcl-process/tests/tdocat.pp

@@ -1,3 +1,5 @@
+{%norun}
+
 program docat;
 program docat;
 
 
 Procedure ReadAndWrite(var O : Text);
 Procedure ReadAndWrite(var O : Text);