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


$ ./perl6-m
> my %a;
().hash
> %a.WHAT
(Hash)
> %a.HOW
Perl6::Metamodel::ClassHOW.new()
> %a.WHEN
Segmentation fault
$ ./perl6-m --version
This is perl6 version 2014.01-47-gd6a93b0 built on MoarVM version
2014.01-4-gdd7ddb4

This bug exists only when executed on the REPL. As a program this executes
just fine.

Example:

use v6;

my %a;
say %a.WHAT;
say %a.HOW;
say %a.WHEN;

Prints:

$ cat test.pl

use v6;

my %a;
say %a.WHAT;
say %a.HOW;
say %a.WHEN;

$ ./perl6-m test.pl
(Hash)
Perl6::Metamodel::ClassHOW.new()
No such method 'WHEN' for invocant of type 'Hash'
  in block  at test.pl:7

Reply via email to