summaryrefslogtreecommitdiff
path: root/ext/B
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2006-08-19 17:34:53 +0300
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2006-08-20 09:25:59 +0000
commitcd47bfdcdcaf11bca8ccb0afadaaa1d23503b9ee (patch)
treeba91b9e327c9917fdc4a7a55d066977d2e539a9d /ext/B
parent2ad6cdcfe92dde0478294e91d9e270fa0160af98 (diff)
downloadperl-cd47bfdcdcaf11bca8ccb0afadaaa1d23503b9ee.tar.gz
bytecode.t failures in Tru64: svtype (enum) is int, not long
Message-Id: <200608191134.k7JBYroK518962@kosh.hut.fi> p4raw-id: //depot/perl@28739
Diffstat (limited to 'ext/B')
-rw-r--r--ext/B/B/Assembler.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/B/B/Assembler.pm b/ext/B/B/Assembler.pm
index af239643ee..f9d3589c19 100644
--- a/ext/B/B/Assembler.pm
+++ b/ext/B/B/Assembler.pm
@@ -150,8 +150,8 @@ sub B::Asmdata::PUT_long {
$Config{longsize} == 8 ? &B::Asmdata::PUT_IV64 : &B::Asmdata::PUT_U32;
}
-sub B::Asmdata::PUT_svtype {
- $Config{longsize} == 8 ? &B::Asmdata::PUT_IV64 : &B::Asmdata::PUT_U32;
+sub B::Asmdata::PUT_svtype { # svtype is an enum, so an int.
+ $Config{intsize} == 4 ? &B::Asmdata::PUT_I32 : &B::Asmdata::PUT_IV64;
}
my %unesc = (n => "\n", r => "\r", t => "\t", a => "\a",