Workaround for linker issues in unit tests

1 files changed, 0 insertions, 43 deletions

diff --git a/test/rat_tests-lexers.adb b/test/rat_tests-lexers.adb
index e216461..7c2fb97 100644
--- a/test/rat_tests-lexers.adb
+++ b/test/rat_tests-lexers.adb
@@ -1,33 +1,8 @@
 
 
-with
-
-    Packrat.Errors,
-    Packrat.Traits,
-    Packrat.Lexers.Debug,
-    Packrat.Utilities;
-
-
 package body Rat_Tests.Lexers is
 
 
-    package PU renames Packrat.Utilities;
-
-
-    type My_Labels is (One, Two, Three);
-
-
-    package Slexy_Traits is new Packrat.Traits (My_Labels, Character, String);
-    package Slexy is new Packrat.Lexers (Slexy_Traits);
-    package Slebug is new Slexy.Debug;
-
-
-    use type Slexy.Combinator_Result;
-
-
-
-
-
     function Join_Check
         return Test_Result
     is
@@ -648,24 +623,6 @@ package body Rat_Tests.Lexers is
 
 
 
-    type Word_Enum is (Blank, Word, Whitespace);
-
-    package Swordy_Traits is new Packrat.Traits (Word_Enum, Character, String);
-    package Swordy is new Packrat.Lexers (Swordy_Traits);
-    package Swolbug is new Swordy.Debug;
-
-    use type Swordy_Traits.Tokens.Token_Type;
-    use type Swordy_Traits.Tokens.Token_Array;
-
-    function Satisfy_Letter is new Swordy.Satisfy (PU.Is_Letter);
-    function Many_Letter is new Swordy.Many (Satisfy_Letter, 1);
-    function Satisfy_Whitespace is new Swordy.Satisfy (PU.Is_Whitespace);
-    function Many_Whitespace is new Swordy.Many (Satisfy_Whitespace, 1);
-
-    function Stamp_Word is new Swordy.Stamp (Word, Many_Letter);
-    function Ignore_Whitespace is new Swordy.Ignore (Whitespace, Many_Whitespace);
-
-
     function Scan_Parts_Check
         return Test_Result
     is