From d46ca6eacf7d512ac6d20dda977a4a33f9d4717c Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Thu, 7 Jul 2011 00:31:03 -0500
Subject: pure perl implementation of the core smartmatch algorithm

---
 t/basic.t | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 't')

diff --git a/t/basic.t b/t/basic.t
index 0493862..b7010e2 100644
--- a/t/basic.t
+++ b/t/basic.t
@@ -10,4 +10,9 @@ ok(1 ~~ 1);
 }
 ok(1 ~~ 1);
 
+{
+    use smartmatch 'core';
+    ok(1 ~~ 1);
+}
+
 done_testing;
-- 
cgit v1.2.3