diff options
| author | Michael G. Schwern <schwern@pobox.com> | 2011-11-15 17:39:07 -0800 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2011-11-17 10:01:34 -0800 |
| commit | bbce3ca648eab3f375216d4c9eba05cb6e005d05 (patch) | |
| tree | 7ab2097535b9ff42568b0f010c31906bb41542b8 /t/mro/overload_c3_utf8.t | |
| parent | b8ab4b0c2ac8ae091a7ed7909f0d9b01ae5717f0 (diff) | |
| download | perl-bbce3ca648eab3f375216d4c9eba05cb6e005d05.tar.gz | |
Add class_ok() and object_ok() to t/test.pl.
Change every existing instance of isa_ok() to use object_ok(). This is safe because
before this point, t/test.pl's isa_ok() only worked on objects. lib/dbmt_common.pl is
the last hold out because it uses Test::More.
These are like isa_ok() but they also check if it's a class or an object.
This lets the core tests defend against outlandish bugs while allowing
t/test.pl to retain feature parity with Test::More.
Diffstat (limited to 't/mro/overload_c3_utf8.t')
| -rw-r--r-- | t/mro/overload_c3_utf8.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/mro/overload_c3_utf8.t b/t/mro/overload_c3_utf8.t index 5a483ef5c0..bcb9f70c77 100644 --- a/t/mro/overload_c3_utf8.t +++ b/t/mro/overload_c3_utf8.t @@ -38,10 +38,10 @@ require q(./test.pl); plan(tests => 7); } my $x = 읺ҎꀀḮṆᵷꜰ롬ᵕveŔŁoad엗텟ᵵ->ネᚹ(); -isa_ok($x, '읺ҎꀀḮṆᵷꜰ롬ᵕveŔŁoad엗텟ᵵ'); +object_ok($x, '읺ҎꀀḮṆᵷꜰ롬ᵕveŔŁoad엗텟ᵵ'); my $y = Ov에rꪩࡃᛝＴeŝṱ->ネᚹ(); -isa_ok($y, 'Ov에rꪩࡃᛝＴeŝṱ'); +object_ok($y, 'Ov에rꪩࡃᛝＴeŝṱ'); is("$x", '읺ҎꀀḮṆᵷꜰ롬ᵕveŔŁoad엗텟ᵵ stringified', '... got the right value when stringifing'); is("$y", 'Ov에rꪩࡃᛝＴeŝṱ stringified', '... got the right value when stringifing'); |