[perl #126184] [BUG] Error in supply block reported at call context instead of definition

[via RT]

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


[jdv@wieldy ~]$ cat -n test.p6
      1 use v6;
      2
      3 my $supply = supply {
      4     die;
      5 }
      6
      7 react {
      8     whenever $supply {
      9
     10     }
     11 }
     12
[jdv@wieldy ~]$ perl6 test.p6
Died
   in block <unit> at test.p6:7

[jdv@wieldy ~]$ perl6 -v
This is perl6 version 2015.09-102-gf89dc23 built on MoarVM version 
2015.09-35-gd15a446
[jdv@wieldy ~]$


Could we report the error being at line 4 instead of 7?

Thanks,
jdv