Add new Consts unit

delphidabbler · delphidabbler · commit c1a53d9fede9 · 2024-10-20T13:04:09.000+01:00
Created new Consts unit

Added to tests DUnitX project. No tests are required for this unit, but
the unit will be eventually be required by later units that will
themselves be tested.
diff --git a/cupola/src/CSLE.Consts.pas b/cupola/src/CSLE.Consts.pas
@@ -0,0 +1,10 @@
+unit CSLE.Consts;
+
+interface
+
+const
+  DOUBLEQUOTE = '"';    // double quote character
+
+implementation
+
+end.
diff --git a/cupola/tests/CodeSnip.Cupola.Tests.dpr b/cupola/tests/CodeSnip.Cupola.Tests.dpr
@@ -40,7 +40,8 @@ uses
   CSLE.Utils.URI in '..\src\CSLE.Utils.URI.pas',
   Test.Utils.URI in 'Test.Utils.URI.pas',
   CSLE.Snippets.TestInfo in '..\src\CSLE.Snippets.TestInfo.pas',
-  Test.Snippets.TestInfo in 'Test.Snippets.TestInfo.pas';
+  Test.Snippets.TestInfo in 'Test.Snippets.TestInfo.pas',
+  CSLE.Consts in '..\src\CSLE.Consts.pas';
 
 {$IFNDEF TESTINSIGHT}
 var
diff --git a/cupola/tests/CodeSnip.Cupola.Tests.dproj b/cupola/tests/CodeSnip.Cupola.Tests.dproj
@@ -99,6 +99,7 @@
         <DCCReference Include="Test.Utils.URI.pas"/>
         <DCCReference Include="..\src\CSLE.Snippets.TestInfo.pas"/>
         <DCCReference Include="Test.Snippets.TestInfo.pas"/>
+        <DCCReference Include="..\src\CSLE.Consts.pas"/>
         <BuildConfiguration Include="Base">
             <Key>Base</Key>
         </BuildConfiguration>
