aboutsummaryrefslogtreecommitdiff
path: root/t/09-cloning.t
diff options
context:
space:
mode:
Diffstat (limited to 't/09-cloning.t')
-rw-r--r--t/09-cloning.t21
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