Cheat for Match.Bool.

rakudo · Feb 6, 2010 · 253ce4b · 253ce4b
1 parent 861695b
commit 253ce4b
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 0 deletions.
diff --git a/build/Makefile.in b/build/Makefile.in
@@ -180,6 +180,7 @@ CORE_SOURCES = \
   src/core/IO.pm \
   src/core/Parameter.pm \
   src/core/Block.pm \
+  src/cheats/match-bool.pm \
   src/cheats/setup-io.pm \
 
 # SETTING = \

diff --git a/src/cheats/match-bool.pm b/src/cheats/match-bool.pm
@@ -0,0 +1,5 @@
+INIT {
+    Regex::Match.^add_method('Bool', method () {
+        self.to >= self.from
+    });
+}