Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
refudge for niecza
  • Loading branch information
coke committed Nov 4, 2012
1 parent eacb839 commit a2adec0
Showing 1 changed file with 4 additions and 1 deletion.
5 changes: 4 additions & 1 deletion integration/weird-errors.t
Expand Up @@ -6,26 +6,28 @@ use Test::Util;
plan 7;

# this used to segfault in rakudo
#?niecza skip 'todo'
is_run(
'try { die 42 }; my $x = $!.WHAT; say $x',
{ status => 0, out => -> $o { $o.chars > 2 }},
'Can stringify $!.WHAT without segfault',
);

#?niecza skip 'todo'
is_run(
'try { die 42; CATCH { when * { say $!.WHAT } }; };',
{ status => 0, out => -> $o { $o.chars > 2 }},
'Can say $!.WHAT in a CATCH block',
);

#?niecza todo
is_run(
'[].WHAT.say',
{ status => 0, out => "Array()\n"},
'Can [].WHAT.say',
);

# RT #70922
#?niecza todo "Frustating -- seems to fail because of other warnings"
is_run(
'class A { method postcircumfix:<{ }>() {} }; my &r = {;}; if 0 { if 0 { my $a } }',
{ status => 0, out => '', err => ''},
Expand All @@ -39,5 +41,6 @@ eval_dies_ok 'time(1, 2, 3)', 'time() with arguments dies';
lives_ok { 1.^methods>>.sort }, 'can use >>.method on result of introspection';

# RT #76946
#?niecza skip 'todo'
lives_ok { Any .= (); CATCH { when X::AdHoc {1} } }, 'Typed, non-internal exception';

0 comments on commit a2adec0

Please sign in to comment.