[svn:parrot] r48683 - trunk/t/oo
cotto at svn.parrot.org
cotto at svn.parrot.org
Fri Aug 27 04:04:01 UTC 2010
Author: cotto
Date: Fri Aug 27 04:04:00 2010
New Revision: 48683
URL: https://trac.parrot.org/parrot/changeset/48683
Log:
add a test for TT #809 to ensure that isa works with an rsa
Modified:
trunk/t/oo/isa.t
Modified: trunk/t/oo/isa.t
==============================================================================
--- trunk/t/oo/isa.t Fri Aug 27 00:28:37 2010 (r48682)
+++ trunk/t/oo/isa.t Fri Aug 27 04:04:00 2010 (r48683)
@@ -20,7 +20,7 @@
.sub main :main
.include 'test_more.pir'
- plan(29)
+ plan(30)
isa_by_string_name()
isa_by_class_object()
@@ -28,6 +28,7 @@
subclass_isa_by_class_object()
string_isa_and_pmc_isa_have_same_result()
string_register_and_string_pmc_isa_have_same_result()
+ isa_accepts_rsa()
.end
@@ -181,6 +182,14 @@
ok( $I0, '... and false when it is not' )
.end
+.sub isa_accepts_rsa
+ $P0 = newclass ['Foo';'Buz']
+ $P1 = new $P0
+ $P0 = split "::", "Foo::Buz"
+ $I0 = isa $P1, $P0
+ ok($I0, "isa accepts a ResizablePMCArray")
+ .end
+
.HLL 'foo'
.namespace ['XYZ']
More information about the parrot-commits
mailing list