Re: [pugs-commits] r27435 - t/spec/S12-attributes

2009-07-05 Thread Moritz Lenz
Kyle Hasselbacher wrote: > On Sun, Jul 5, 2009 at 11:33 PM, Patrick R. Michaud wrote: >> On Mon, Jul 06, 2009 at 06:28:27AM +0200, pugs-comm...@feather.perl6.nl >> wrote: >>> +# RT #57336 >>> +{ >>> +# XXX Right message? >>> +my $good_message = q{Lexical 'self' not found}; >>> +my $bad

Re: [pugs-commits] r27435 - t/spec/S12-attributes

2009-07-05 Thread Kyle Hasselbacher
On Sun, Jul 5, 2009 at 11:33 PM, Patrick R. Michaud wrote: > On Mon, Jul 06, 2009 at 06:28:27AM +0200, pugs-comm...@feather.perl6.nl wrote: >> +# RT #57336 >> +{ >> +    # XXX Right message? >> +    my $good_message = q{Lexical 'self' not found}; >> +    my $bad_code; >> + >> +    $bad_code = '$.a'

Re: [pugs-commits] r27435 - t/spec/S12-attributes

2009-07-05 Thread Patrick R. Michaud
On Mon, Jul 06, 2009 at 06:28:27AM +0200, pugs-comm...@feather.perl6.nl wrote: > +# RT #57336 > +{ > +# XXX Right message? > +my $good_message = q{Lexical 'self' not found}; > +my $bad_code; > + > +$bad_code = '$.a'; > +eval $bad_code; > +ok $! ~~ Exception, "bad code: '$bad