diff options
author | Zoffix Znet <cpan@zoffix.com> | 2016-06-05 21:39:47 -0400 |
---|---|---|
committer | Zoffix Znet <cpan@zoffix.com> | 2016-06-05 21:39:47 -0400 |
commit | 140959e4f170d732d990e69b9a0ca129b89e3ac4 (patch) | |
tree | c96d92c8eba8af28eea21585c1c0e5c8a18f69d7 /lib/old-IRC/Grammar.pm6 | |
parent | 16056e8af837a4d982d23728adf24b4cc406576c (diff) |
First working test
Diffstat (limited to 'lib/old-IRC/Grammar.pm6')
-rw-r--r-- | lib/old-IRC/Grammar.pm6 | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/lib/old-IRC/Grammar.pm6 b/lib/old-IRC/Grammar.pm6 deleted file mode 100644 index c05322c..0000000 --- a/lib/old-IRC/Grammar.pm6 +++ /dev/null @@ -1,20 +0,0 @@ -unit grammar IRC::Grammar; -token TOP { <message>+ } -token SPACE { ' '+ } -token message { [':' <prefix> <SPACE> ]? <command> <params> \n } - token prefix { - [ <servername> || <nick> ['!' <user>]? ['@' <host>]? ] - <before <SPACE>> - } - token servername { <host> } - token nick { <letter> [ <letter> | <number> | <special> ]* } - token user { <-[\ \x0\r\n]>+? <before [<SPACE> | '@']>} - token host { <-[\s!@]>+ } - token command { <letter>+ | <number>**3 } - token params { <SPACE>* [ ':' <trailing> | <middle> <params> ]? } - token middle { <-[:\ \x0\r\n]> <-[\ \x0\r\n]>* } - token trailing { <-[\x0\r\n]>* } - - token letter { <[a..zA..Z]> } - token number { <[0..9]> } - token special { <[-_\[\]\\`^{}]> } |