Don't do Parrot interop role except on Parrot.

rakudo · Apr 27, 2013 · 82e9667 · 82e9667
1 parent b6b88bf
commit 82e9667
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 0 deletions.
diff --git a/src/Perl6/Metamodel/ClassHOW.nqp b/src/Perl6/Metamodel/ClassHOW.nqp
@@ -18,7 +18,9 @@ class Perl6::Metamodel::ClassHOW
     does Perl6::Metamodel::Mixins
     does Perl6::Metamodel::BoolificationProtocol
     does Perl6::Metamodel::REPRAttributeProtocol
+#?if parrot
     does Perl6::Metamodel::ParrotInterop
+#?endif
 {
     has @!roles;
     has @!role_typecheck_list;

diff --git a/src/Perl6/Metamodel/EnumHOW.nqp b/src/Perl6/Metamodel/EnumHOW.nqp
@@ -15,7 +15,9 @@ class Perl6::Metamodel::EnumHOW
     does Perl6::Metamodel::BUILDPLAN
     does Perl6::Metamodel::BoolificationProtocol
     does Perl6::Metamodel::REPRAttributeProtocol
+#?if parrot
     does Perl6::Metamodel::ParrotInterop
+#?endif
 {
     # Hash representing enumeration keys to values.
     has %!values;