From ba793ec6d1d4c66300f40cbced25f9ffd23ec792 Mon Sep 17 00:00:00 2001
From: Zoffix Znet <cpan@zoffix.com>
Date: Sun, 6 Dec 2015 15:05:29 -0500
Subject: Debug

---
 lib/IRC/Grammar.pm6 | 21 +--------------------
 1 file changed, 1 insertion(+), 20 deletions(-)

(limited to 'lib/IRC/Grammar.pm6')

diff --git a/lib/IRC/Grammar.pm6 b/lib/IRC/Grammar.pm6
index 46d71cc..d26a3dc 100644
--- a/lib/IRC/Grammar.pm6
+++ b/lib/IRC/Grammar.pm6
@@ -1,6 +1,5 @@
-# use Grammar::Debugger;
 unit grammar IRC::Grammar:ver<1.001001>;
-token TOP { <message> }
+token TOP { <message>+ }
 token SPACE { ' '+ }
 token message { [':' <prefix> <SPACE> ]? <command> <params> \n }
     token prefix  {
@@ -19,21 +18,3 @@ token message { [':' <prefix> <SPACE> ]? <command> <params> \n }
     token letter { <[a..zA..Z]> }
     token number { <[0..9]> }
     token special { <[-\[\]\\`^{}]> }
-
-# unit class IRC::Grammar::Actions:ver<1.001001>;
-# method TOP      ($/) { $/.make: $<message>».made }
-# method message  ($/) { $/.make:
-#     prefix  => $<prefix> .made,
-#     command => $<command>.made,
-#     params  => $<params  .made,
-# }
-# method prefix   ($/) { [<servername> | <nick>] [ '!' <user> ]? [ '@' <host> ]? }
-# method command  ($/) { <letter>+ | <number>**3                                 }
-# method params   ($/) { ' '+ [ ':' <trailing> | <middle> <params> ]?            }
-# method middle   ($/) { <-[: \0\r\n]> <-[ \0\r\n]>+                             }
-# method trailing ($/) { <-[\0\r\n]>                                             }
-#
-# method class     ($/) { $/.make: ~$/                            }
-# method rules     ($/) { $/.make: ~$/                            }
-# method pair      ($/) { $/.make: $<class>.made => $<rules>.made }
-# method TOP       ($/) { $/.make: $<pair>».made                  }
-- 
cgit v1.1