split this out into its own dist, and implement the custom opcode

1 files changed, 0 insertions, 69 deletions

diff --git a/t/lexical.t b/t/lexical.t
deleted file mode 100644
index 036fe8a..0000000
--- a/t/lexical.t
+++ /dev/null
@@ -1,69 +0,0 @@
-#!/usr/bin/env perl
-use strict;
-use warnings;
-use Test::More;
-
-{
-    ok(1 ~~ 1);
-    ok(!(1 ~~ 0));
-    {
-        ok(1 ~~ 1);
-        ok(!(1 ~~ 0));
-        use smartmatch sub { 0 };
-        ok(!(1 ~~ 1));
-        ok(!(1 ~~ 0));
-        {
-            ok(!(1 ~~ 1));
-            ok(!(1 ~~ 0));
-            use smartmatch sub { 1 };
-            ok(1 ~~ 1);
-            ok(1 ~~ 0);
-            use smartmatch sub { 0 };
-            ok(!(1 ~~ 1));
-            ok(!(1 ~~ 0));
-            use smartmatch sub { 1 };
-            ok(1 ~~ 1);
-            ok(1 ~~ 0);
-        }
-        ok(!(1 ~~ 1));
-        ok(!(1 ~~ 0));
-    }
-    ok(1 ~~ 1);
-    ok(!(1 ~~ 0));
-}
-
-{
-    ok(eval "1 ~~ 1");
-    ok(!eval "1 ~~ 0");
-    {
-        ok(eval "1 ~~ 1");
-        ok(!eval "1 ~~ 0");
-        use smartmatch sub { 0 };
-        ok(!eval "1 ~~ 1");
-        ok(!eval "1 ~~ 0");
-        {
-            ok(!eval "1 ~~ 1");
-            ok(!eval "1 ~~ 0");
-            use smartmatch sub { 1 };
-            ok(eval "1 ~~ 1");
-            ok(eval "1 ~~ 0");
-            use smartmatch sub { 0 };
-            ok(!eval "1 ~~ 1");
-            ok(!eval "1 ~~ 0");
-            use smartmatch sub { 1 };
-            ok(eval "1 ~~ 1");
-            ok(eval "1 ~~ 0");
-        }
-        ok(!eval "1 ~~ 1");
-        ok(!eval "1 ~~ 0");
-    }
-    ok(eval "1 ~~ 1");
-    ok(!eval "1 ~~ 0");
-}
-
-{
-    use smartmatch sub { 0 };
-    require 't/lib/lexical.pl';
-}
-
-done_testing;