Hi! This is the ezmlm program. I'm managing the
perl6-compi...@perl.org mailing list.

I'm working for my owner, who can be reached
at perl6-compiler-ow...@perl.org.


Messages to you from the perl6-compiler mailing list seem to
have been bouncing. I've attached a copy of the first bounce
message I received.

If this message bounces too, I will send you a probe. If the probe bounces,
I will remove your address from the perl6-compiler mailing list,
without further notice.


I've kept a list of which messages from the perl6-compiler mailing list have 
bounced from your address.

Copies of these messages may be in the archive.

To retrieve a set of messages 123-145 (a maximum of 100 per request),
send an empty message to:
   <perl6-compiler-get.123_...@perl.org>

To receive a subject and author list for the last 100 or so messages,
send an empty message to:
   <perl6-compiler-in...@perl.org>

Here are the message numbers:

   8837
   8838
   8839
   8840
   8853

--- Enclosed is a copy of the bounce message I received.

Return-Path: <>
Received: (qmail 15736 invoked from network); 2 Apr 2013 04:06:59 -0000
Received: from x1.develooper.com (207.171.7.70)
  by x6.develooper.com with SMTP; 2 Apr 2013 04:06:59 -0000
Received: (qmail 20032 invoked by uid 225); 2 Apr 2013 04:06:59 -0000
Delivered-To: perl6-compiler-return-8837-perl6-all-poster=perl....@perl.org
Received: (qmail 20025 invoked by alias); 2 Apr 2013 04:06:58 -0000
Received: from unknown (HELO x6.develooper.com) (10.0.100.16)
  by x1.dev with SMTP; 2 Apr 2013 04:06:58 -0000
Received: by x6.develooper.com (Postfix)
        id B01DB178D6; Mon,  1 Apr 2013 21:06:54 -0700 (PDT)
Date: Mon,  1 Apr 2013 21:06:54 -0700 (PDT)
From: mailer-dae...@x6.develooper.com (Mail Delivery System)
Subject: Undelivered Mail Returned to Sender
To: perl6-compiler-return-8837-perl6-all-poster=perl....@perl.org
Auto-Submitted: auto-replied
MIME-Version: 1.0
Content-Type: multipart/report; report-type=delivery-status;
        boundary="B0A5C178DB.1364875614/x6.develooper.com"
Content-Transfer-Encoding: 8bit
Message-Id: <20130402040654.b01db17...@x6.develooper.com>

This is a MIME-encapsulated message.

--B0A5C178DB.1364875614/x6.develooper.com
Content-Description: Notification
Content-Type: text/plain; charset=us-ascii

This is the mail system at host x6.develooper.com.

I'm sorry to have to inform you that your message could not
be delivered to one or more recipients. It's attached below.

For further assistance, please send mail to <postmaster>

If you do so, please include this problem report. You can
delete your own text from the attached returned message.

                   The mail system

<perl6-all-pos...@perl.org>: host mx.develooper.com[207.171.7.76] said: 552 The
    Date in the header was too far in the past (in reply to end of DATA
    command)

--B0A5C178DB.1364875614/x6.develooper.com
Content-Description: Delivery report
Content-Type: message/delivery-status

Reporting-MTA: dns; x6.develooper.com
X-Postfix-Queue-ID: B0A5C178DB
X-Postfix-Sender: rfc822; 
perl6-compiler-return-8837-perl6-all-poster=perl....@perl.org
Arrival-Date: Mon,  1 Apr 2013 21:06:46 -0700 (PDT)

Final-Recipient: rfc822; perl6-all-pos...@perl.org
Original-Recipient: rfc822;perl6-all-pos...@perl.org
Action: failed
Status: 5.0.0
Remote-MTA: dns; mx.develooper.com
Diagnostic-Code: smtp; 552 The Date in the header was too far in the past

--B0A5C178DB.1364875614/x6.develooper.com
Content-Description: Undelivered Message
Content-Type: message/rfc822
Content-Transfer-Encoding: 8bit

Received: from lists-nntp.develooper.com (localhost.localdomain [127.0.0.1])
        by x6.develooper.com (Postfix) with SMTP id B0A5C178DB
        for <perl6-all-pos...@perl.org>; Mon,  1 Apr 2013 21:06:46 -0700 (PDT)
Received: (qmail 14290 invoked by uid 514); 2 Apr 2013 04:06:23 -0000
Mailing-List: contact perl6-compiler-h...@perl.org; run by ezmlm
Precedence: bulk
List-Post: <mailto:perl6-compi...@perl.org>
List-Help: <mailto:perl6-compiler-h...@perl.org>
List-Unsubscribe: <mailto:perl6-compiler-unsubscr...@perl.org>
List-Subscribe: <mailto:perl6-compiler-subscr...@perl.org>
List-Id: <perl6-compiler.perl.org>
Delivered-To: mailing list perl6-compi...@perl.org
Delivered-To: moderator for perl6-compi...@perl.org
Received: (qmail 10412 invoked from network); 29 Mar 2013 02:18:00 -0000
Delivered-To: perl6-compi...@perl.org
X-Spam-Status: No, hits=-2.9 required=8.0
        tests=ALL_TRUSTED,BAYES_00
X-Spam-Check-By: la.mx.develooper.com
From: Andrew Robbins (via RT) <perl6-bugs-follo...@perl.org>
X-RT-NewTicket: yes
To: bugs-bitbuc...@rt.perl.org
Resent-To: perl6-compi...@perl.org
Mail-Followup-To: perl6-compi...@perl.org
Reply-To: perl6-compi...@perl.org
Date: Thu, 28 Mar 2013 19:17:54 -0700
Subject: [perl #117397] symbolic indirect subrules
In-Reply-To: 
<CAAMbix+x8N0vxHJA5X29=LST65yRdHX1kJD2F2nigz61i=e...@mail.gmail.com>
References: <rt-ticket-117...@perl.org>
 <CAAMbix+x8N0vxHJA5X29=LST65yRdHX1kJD2F2nigz61i=e...@mail.gmail.com>
Message-ID: <rt-3.6.head-28177-1364523474-713.117397-8...@perl.org>
X-RT-Loop-Prevention: perl
RT-Ticket: perl #117397
Managed-BY: RT 3.6.HEAD (http://www.bestpractical.com/rt/)
RT-Originator: andj...@gmail.com
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
Content-Type: text/plain; charset="utf-8"
X-RT-Original-Encoding: utf-8
Resent-Message-Id: <20130329021754.6033235...@x17.develooper.com>
Resent-Date: Thu, 28 Mar 2013 19:17:54 -0700 (PDT)
Resent-From: rt-andjrob=gmail....@rt.perl.org

# New Ticket Created by  Andrew Robbins 
# Please include the string:  [perl #117397]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=117397 >


The spec says you should be able to use <::($name)>, but rakudo doesn't work.

me>
n: grammar G { rule TOP {^ <A>+ $}; regex B($what) { <::($what)> };
regex C { 'test' }; regex A { <B('C')> }; }; say G.parse('testtest')

p6eval>
niecza v24-35-g5c06e28: OUTPUT«「testtest」␤ A => 「test」␤  B => 
「test」␤
::($what) => 「test」␤ A => 「test」␤  B => 「test」␤  ::($what) =>
「test」␤␤»

me>
r: grammar G { rule TOP {^ <A>+ $}; regex B($what) { <::($what)> };
regex C { 'test' }; regex A { <B('C')> }; }; say G.parse('testtest')

p6eval>
rakudo 25a9d6: OUTPUT«No such method 'QAST::Var<1988309812>' for
invocant of type 'G'␤  in regex B at /tmp/RtzoutigI0:1␤  in regex A at
/tmp/RtzoutigI0:1␤  in regex TOP at /tmp/RtzoutigI0:1␤  in method
parse at src/gen/CORE.setting:10941␤  in block  at
/tmp/RtzoutigI0:1␤␤»

--B0A5C178DB.1364875614/x6.develooper.com--

Reply via email to