Help language development. Donate to The Perl Foundation

Red cpan:FCO last updated on 2020-07-23

t/21-new-with-id.t
use Red;
use Test;

model Bla{ has Str $.id is id }
model Ble{ has Str $.other-name is id }

is Bla.^new-with-id("blablabla").id, "blablabla";
is Ble.^new-with-id("blablabla").other-name, "blablabla";

done-testing;