install hash() constructor, make t/setting/02-hash.t pass again

Raku · May 13, 2011 · c9dd840 · c9dd840
1 parent bb72006
commit c9dd840
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 0 deletions.
diff --git a/build/Makefile.in b/build/Makefile.in
@@ -87,6 +87,7 @@ CORE_SETTING_SOURCES = \
   src/core/NQPCapture.pm \
   src/core/IO.pm \
   src/core/Regex.pm \
+  src/core/Hash.pm \
   src/core/testing.pm \
 
 CORE_SETTING_NQP = NQPCORE.setting

diff --git a/src/core/Hash.pm b/src/core/Hash.pm
@@ -0,0 +1,7 @@
+sub hash(*%new) {
+    my %h;
+    for %new {
+        %h{$_} := %new{$_};
+    }
+    %h;
+}