From b95e79230e336b6647506869bc7f0351b2ed73ee Mon Sep 17 00:00:00 2001
From: jnthn <jnthn@jnthn.net>
Date: Thu, 10 Dec 2009 16:16:19 +0000
Subject: [PATCH] Fix one of the issues with attribute mix-ins; gets back
 another test.

---
 src/metamodel/RoleToInstanceApplier.nqp | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/metamodel/RoleToInstanceApplier.nqp b/src/metamodel/RoleToInstanceApplier.nqp
index 2d4bc55a55d..a57c589f06c 100644
--- a/src/metamodel/RoleToInstanceApplier.nqp
+++ b/src/metamodel/RoleToInstanceApplier.nqp
@@ -33,8 +33,10 @@ method apply($target, @composees) {
 
     # Complete construction of anonymous subclass and then rebless the target
     # into it. XXX This bit is a tad Parrot-specific at the moment; need to
-    # better encapsulate reblessing.
+    # better encapsulate reblessing. Also we need to make a fake instance of
+    # the subclass to have Parrot internally form it's various bits.
     my $new_class := $how.compose($subclass);
+    pir::new__PP($how.get_parrotclass($new_class));
     pir::rebless_subclass__vPP($target, $how.get_parrotclass($new_class));
 }