masak (>):
> <masak> m: macro postfix:<!!>($o) { quasi { die "Null check failed for
> ", $o.Str unless defined {{{$o}}}; {{{$o}}} } }; say 42!!; my
> $cookies; my $food = $cookies!!
> 16:18 <+camelia> rakudo-moar 51ddd5: OUTPUT«42␤Null check failed for ␤
>  in any [...]»
> <masak> so close.
> * masak submits rakudobug
> <masak> (it should capture the string '$cookies' in $o.Str, IMO)
> <masak> that is, the error message shoulda been 'Null check failed for
> $cookies'

This works now, thanks for moritz++.

$ cat RT-122746-code
macro postfix:<!!>($o) {
    quasi {
        die "Null check failed for ", $o.Str
            unless defined {{{$o}}};
        {{{$o}}}
    }
}

say 42!!;

my $cookies;
my $food = $cookies!!
masak@siddharta ~/mine/macro-grant $ perl6 RT-122746-code
42
Null check failed for $cookies
  in any  at RT-122746-code:3
  in block <unit> at RT-122746-code:12

Marking ticket as testneeded.

Reply via email to