Re: Re: Re: Re[4]: Популяризация

[Евгений Карпенко]

>
> % perl6 -e 'subset Positive of Int where { $_ > 0 }; my Positive $x = -1;'
> Type check failed for assignment
>
> % perl6 -e 'subset Positive of Int where { $_ > 0 }; my Positive $x =
> 42; $x.say'
> 42


Просто создать множество чисел больше нуля?
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.pm.org/pipermail/kiev-pm/attachments/20100808/06aff863/attachment.html>