From 44ba063696e71a53b463070c0c5cf433aad6091b Mon Sep 17 00:00:00 2001
From: Elizabeth Mattijsen <liz@raku.rocks>
Date: Sat, 9 Sep 2023 19:04:26 +0200
Subject: [PATCH] RakuAST: remove %comma hash

---
 src/Raku/Grammar.nqp | 8 ++------
 1 file changed, 2 insertions(+), 6 deletions(-)

diff --git a/src/Raku/Grammar.nqp b/src/Raku/Grammar.nqp
index b36ac5774cc..27e877fcc4d 100644
--- a/src/Raku/Grammar.nqp
+++ b/src/Raku/Grammar.nqp
@@ -1629,7 +1629,6 @@ grammar Raku::Grammar is HLL::Grammar does Raku::Common {
 # Operators
 
     # Precedence levels and their defaults
-    my %comma           := nqp::hash('prec', 'g=', 'assoc', 'list', 'dba', 'comma', 'nextterm', 'nulltermish');
     my %list_infix      := nqp::hash('prec', 'f=', 'assoc', 'list', 'dba', 'list infix');
     my %list_prefix     := nqp::hash('prec', 'e=', 'assoc', 'right', 'dba', 'list prefix');
     my %sequencer       := nqp::hash('prec', 'b=', 'assoc', 'list', 'dba', 'sequencer');
@@ -2289,13 +2288,10 @@ grammar Raku::Grammar is HLL::Grammar does Raku::Common {
         ]
     }
 
-    token infix:sym<,>    {
-        <.unspace>? <sym> <O(|%comma)>
-    }
-    token infix:sym<:>    {
+    token infix:sym<,> { <.unspace>? <sym> }
+    token infix:sym<:> {
         <?{ $*INVOCANT_OK && $*GOAL ne '!!' }>
         <.unspace>? <sym> <?before \s | <.terminator> | $ >
-        <O(|%comma)>
         [ <?{ $*INVOCANT_OK }> || <.panic: "Invocant colon not allowed here"> ]
         { $*INVOCANT_OK := 0; }
     }