diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1998-01-30 10:44:38 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-01-30 10:44:38 +0000 |
| commit | 6b6eec5b869ecabb6b96b0d84c01808aecc78d84 (patch) | |
| tree | be188f6c9db63d9911541036c2e15a4d6b607b5d /universal.c | |
| parent | 65c6b2907476177557b1357ec8e2bda83f220e47 (diff) | |
| parent | 875e910638b0552c0eec0bc83eb2d5b3f85f5df5 (diff) | |
| download | perl-6b6eec5b869ecabb6b96b0d84c01808aecc78d84.tar.gz | |
[asperl] initial merge of latest win32 branch into ASPerl
p4raw-id: //depot/asperl@445
Diffstat (limited to 'universal.c')
| -rw-r--r-- | universal.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/universal.c b/universal.c index 5ccd731a70..18989aaf02 100644 --- a/universal.c +++ b/universal.c @@ -47,7 +47,8 @@ isa_lookup(HV *stash, char *name, int len, int level) } if(hv) { SV** svp = AvARRAY(av); - I32 items = AvFILL(av) + 1; + /* NOTE: No support for tied ISA */ + I32 items = AvFILLp(av) + 1; while (items--) { SV* sv = *svp++; HV* basestash = gv_stashsv(sv, FALSE); |