diff options
| author | Chip Salzenberg <chip@atlantic.net> | 1996-12-23 12:58:58 +1200 |
|---|---|---|
| committer | Chip Salzenberg <chip@atlantic.net> | 1996-12-23 12:58:58 +1200 |
| commit | 13826f2cf81099b832a12ff02c10a2f9d23cd6e5 (patch) | |
| tree | 24a90e6abe01e18770f4fe58907acc2f6a5ece4a /op.c | |
| parent | d97d40b5b09d6d89f9fc39d5d51be2de4320c77b (diff) | |
| download | perl-13826f2cf81099b832a12ff02c10a2f9d23cd6e5.tar.gz | |
Fixes for Interactive Unix
(this is the same change as commit 1ab5d0547ab7398ea9e3e00b1c1b0f1f8ea0dd94, but as applied)
Diffstat (limited to 'op.c')
| -rw-r--r-- | op.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -186,7 +186,7 @@ pad_findlex(char *name, PADOFFSET newoff, U32 seq, CV* startcv, I32 cx_ix) if ((sv = svp[off]) && sv != &sv_undef && seq <= SvIVX(sv) && - seq > (I32)SvNVX(sv) && + seq > I_32(SvNVX(sv)) && strEQ(SvPVX(sv), name)) { I32 depth; @@ -277,7 +277,7 @@ char *name; if ((sv = svp[off]) && sv != &sv_undef && seq <= SvIVX(sv) && - seq > (I32)SvNVX(sv) && + seq > I_32(SvNVX(sv)) && strEQ(SvPVX(sv), name)) { return (PADOFFSET)off; |