diff options
Diffstat (limited to 't')
-rw-r--r-- | t/09-cloning.t | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/t/09-cloning.t b/t/09-cloning.t new file mode 100644 index 0000000..b13cd7d --- /dev/null +++ b/t/09-cloning.t @@ -0,0 +1,21 @@ +#! /usr/bin/env perl6 + +use v6.c; + +use Test; + +use Config; + +plan 2; + +my Config $a .= new.read: %( + foo => "bar", + baz => 42, +); + +my Config $b = $a.clone; + +is-deeply $a.get, $b.get, "B contains the same data as A"; +isnt $a, $b, "A and B are not the same object"; + +# vim: ft=perl6 noet |