[perl #71820] Subset name omitted from error when typecheck fails

[publiustemp-perl6interna...@yahoo.com (via RT)]

# New Ticket Created by  publiustemp-perl6interna...@yahoo.com 
# Please include the string:  [perl #71820]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=71820 >


For this code:

  use v6;

  class Foo {
      subset Filename of Str where { $_ ~~ :f }
      has Filename $.filename is rw;
  }
  my $foo = Foo.new(filename => 'no_such_file');

We get this error:

  Assignment type check failed; expected , but got Str
  in Main (file <unknown>, line <unknown>)

This fails in master at db84bc06990c37b93fe987dcffab4ed9bf31de92

Cheers,
Ovid
--
Buy the book         - http://www.oreilly.com/catalog/perlhks/
Tech blog            - http://use.perl.org/~Ovid/journal/
Twitter              - http://twitter.com/OvidPerl
Official Perl 6 Wiki - http://www.perlfoundation.org/perl6