Fix missing type check and method caches.

Raku · Jan 18, 2013 · 769044f · 769044f
1 parent e29532a
commit 769044f
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 0 deletions.
diff --git a/src/how/NQPConcreteRoleHOW.pm b/src/how/NQPConcreteRoleHOW.pm
@@ -110,6 +110,9 @@ knowhow NQPConcreteRoleHOW {
 
         # Mark composed.
         $!composed := 1;
+        nqp::settypecache($obj, [$obj.WHAT]);
+        nqp::setmethcache($obj, {});
+        nqp::setmethcacheauth($obj, 1);
         $obj
     }
 

diff --git a/src/how/NQPParametricRoleHOW.pm b/src/how/NQPParametricRoleHOW.pm
@@ -96,6 +96,9 @@ knowhow NQPParametricRoleHOW {
     # Compose the role. Beyond this point, no changes are allowed.
     method compose($obj) {
         $!composed := 1;
+        nqp::settypecache($obj, [$obj.WHAT]);
+        nqp::setmethcache($obj, {});
+        nqp::setmethcacheauth($obj, 1);
         $obj
     }