diff options
| author |   millert <millert@openbsd.org> | 2002-10-27 22:14:39 +0000 |
|---|---|---|
| committer | millert <millert@openbsd.org> | 2002-10-27 22:14:39 +0000 |
| commit | 55745691c11d58794cc2bb4d620ee3985f4381e6 (patch) | |
| tree | d570f77ae0fda2ab3c9daa80b06a330c16cfe79f /gnu/usr.bin/perl/t/lib/warnings/universal | |
| parent | remove MD bits from test. (diff) | |
| download | wireguard-openbsd-55745691c11d58794cc2bb4d620ee3985f4381e6.tar.xz wireguard-openbsd-55745691c11d58794cc2bb4d620ee3985f4381e6.zip | |
stock perl 5.8.0 from CPAN
Diffstat (limited to 'gnu/usr.bin/perl/t/lib/warnings/universal')
| -rw-r--r-- | gnu/usr.bin/perl/t/lib/warnings/universal | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/gnu/usr.bin/perl/t/lib/warnings/universal b/gnu/usr.bin/perl/t/lib/warnings/universal new file mode 100644 index 00000000000..d9b1883532d --- /dev/null +++ b/gnu/usr.bin/perl/t/lib/warnings/universal @@ -0,0 +1,14 @@ + universal.c AOK + + Can't locate package %s for @%s::ISA [S_isa_lookup] + + + +__END__ +# universal.c [S_isa_lookup] +use warnings 'misc' ; +@ISA = qw(Joe) ; +my $a = bless [] ; +UNIVERSAL::isa $a, Jim ; +EXPECT +Can't locate package Joe for @main::ISA at - line 5. |