Author: allison
Date: Mon Apr 16 23:30:42 2007
New Revision: 18255
Modified:
trunk/t/pmc/pmc.t
Log:
This test needs to be told which PMC types can't be instantiated directly by
the 'new' opcode. It already knew to skip ParrotObject, but didn't know to skip
Object.
Modified: trunk/t/pmc/pmc.t
==============================================================================
--- trunk/t/pmc/pmc.t (original)
+++ trunk/t/pmc/pmc.t Mon Apr 16 23:30:42 2007
@@ -115,7 +115,7 @@
while ( my ( $type, $id ) = each %pmc_types ) {
next if grep { $type eq $_ } qw/
Null Iterator Enumerate Ref STMRef SharedRef ParrotObject ParrotThread
- deleg_pmc BigInt LexInfo LexPad Slice
+ deleg_pmc BigInt LexInfo LexPad Slice Object
/; # these need an initializer
my $set_ro = ( $type =~ /^Const\w+/ ) ? <<EOPASM : '';
new P10, .Integer
