summaryrefslogtreecommitdiff
path: root/ext/ByteLoader
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-11-29 01:22:02 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-11-29 01:22:02 +0000
commit11a7ac70a867da65019c2c04f8677bdcf4c9693e (patch)
tree6e85a1f8a424bb674fb9f6071a740a8036205d81 /ext/ByteLoader
parentb2ce0fda3a46ec47a3c0b2c5696aaa867384eb2f (diff)
downloadperl-11a7ac70a867da65019c2c04f8677bdcf4c9693e.tar.gz
Change $=, $., $*, $%, and $- to be IVs instead of longs.
p4raw-id: //depot/perl@13346
Diffstat (limited to 'ext/ByteLoader')
-rw-r--r--ext/ByteLoader/byterun.c20
1 files changed, 10 insertions, 10 deletions
diff --git a/ext/ByteLoader/byterun.c b/ext/ByteLoader/byterun.c
index 94d7ce8d70..3d680cdb06 100644
--- a/ext/ByteLoader/byterun.c
+++ b/ext/ByteLoader/byterun.c
@@ -273,36 +273,36 @@ byterun(pTHX_ register struct byteloader_state *bstate)
}
case INSN_XFM_LINES: /* 30 */
{
- I32 arg;
- BGET_I32(arg);
+ IV arg;
+ BGET_IV(arg);
FmLINES(bstate->bs_sv) = arg;
break;
}
case INSN_XIO_LINES: /* 31 */
{
- long arg;
- BGET_I32(arg);
+ IV arg;
+ BGET_IV(arg);
IoLINES(bstate->bs_sv) = arg;
break;
}
case INSN_XIO_PAGE: /* 32 */
{
- long arg;
- BGET_I32(arg);
+ IV arg;
+ BGET_IV(arg);
IoPAGE(bstate->bs_sv) = arg;
break;
}
case INSN_XIO_PAGE_LEN: /* 33 */
{
- long arg;
- BGET_I32(arg);
+ IV arg;
+ BGET_IV(arg);
IoPAGE_LEN(bstate->bs_sv) = arg;
break;
}
case INSN_XIO_LINES_LEFT: /* 34 */
{
- long arg;
- BGET_I32(arg);
+ IV arg;
+ BGET_IV(arg);
IoLINES_LEFT(bstate->bs_sv) = arg;
break;
}