From 11dcaa03fe07fb880fe9f29a7cfaec91043dad81 Mon Sep 17 00:00:00 2001
From: Patrick Spek <p.spek@tyil.nl>
Date: Wed, 22 Nov 2017 13:34:16 +0100
Subject: Implement .keys method

---
 t/07-keys.t | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)
 create mode 100644 t/07-keys.t

(limited to 't')

diff --git a/t/07-keys.t b/t/07-keys.t
new file mode 100644
index 0000000..225c0b8
--- /dev/null
+++ b/t/07-keys.t
@@ -0,0 +1,22 @@
+#! /usr/bin/env perl6
+
+use v6;
+
+use Config::Parser::NULL;
+use Config;
+use Test;
+
+my Config $c .= new.read: %(
+	"a" => False,
+	"b" => False,
+	"c" => %(
+		"a" => False,
+		"b" => False,
+	),
+);
+
+my @keys = < a b c.a c.b >;
+
+is $c.keys, @keys, ".keys returns a list of all keys";
+
+# vim: ft=perl6 noet
-- 
cgit v1.1