Fix endless recursion in Hash coercer

Fixes hang in Hash((:a)) and (:a).Hash
rakudo · Aug 20, 2015 · 7b80988 · 7b80988
1 parent 1fbbd02
commit 7b80988
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/core/Hash.pm b/src/core/Hash.pm
@@ -2,6 +2,10 @@ my class Hash { # declared in BOOTSTRAP
     # my class Hash is EnumMap {
     #     has Mu $!descriptor;
 
+    multi method Hash() {
+        self
+    }
+
     multi method AT-KEY(Hash:D: \key) is rw {
         my Mu $storage := nqp::getattr(self, EnumMap, '$!storage');
         $storage := nqp::bindattr(self, EnumMap, '$!storage', nqp::hash())