From d357695b83624648d594bf78518a5c907da965d9 Mon Sep 17 00:00:00 2001
From: Kodi Arfer <hippo@Thoth.(none)>
Date: Sun, 17 Oct 2010 09:46:51 -0400
Subject: [PATCH] Made &make a list operator.

---
 src/core/Grammar.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/core/Grammar.pm b/src/core/Grammar.pm
index f2b835d8027..a2d992c325d 100644
--- a/src/core/Grammar.pm
+++ b/src/core/Grammar.pm
@@ -15,7 +15,9 @@ class Grammar is Cursor {
     }
 }
 
-our sub make($ast) {
+our sub make (*@ast) {
+    my $ast = (sub { return |@ast })();
+
     Q:PIR {
         $P0 = find_dynamic_lex '$/'
         $P1 = find_lex '$ast'