...we are installing 64bit Suse boxes. I normally compile our own Perl,
leaving the vendor Perl alone. I don't think this will help with this
problem though (unless I compile as 32 bit). The following XS code
fails in libc - strlen(),
=============================================================================
1180 {
(gdb) n
1181 dXSARGS;
(gdb) n
1182 if (items != 2)
(gdb) n
1188 dXSTARG;
(gdb) n
1190 if (sv_derived_from(ST(0), "FMTPtr")) {
(gdb) n
1191 IV tmp = SvIV((SV*)SvRV(ST(0)));
(gdb) n
1197 if (sv_derived_from(ST(1), "FMT_FLDPtr")) {
(gdb) n
1198 IV tmp = SvIV((SV*)SvRV(ST(1)));
(gdb) n
419 RETVAL = (char *)fmt_get_fld_location(fmt, fld);
(gdb) p tmp
$4 = 11516288
(gdb) n
1206 sv_setpv(TARG, RETVAL); XSprePUSH; PUSHTARG;
(gdb) p RETVAL
No symbol "RETVAL" in current context.
(gdb) s
419 RETVAL = (char *)fmt_get_fld_location(fmt, fld);
(gdb) s
1206 sv_setpv(TARG, RETVAL); XSprePUSH; PUSHTARG;
(gdb) s
Program received signal SIGSEGV, Segmentation fault.
0x00002ad1795286d0 in strlen () from /lib64/libc.so.6
=================================================================================
...at first I thought it was the threaded-64 bit Perls, but it seg
faults on a non-threaded version as well. It runs fine on a 32 bit
server.
I am really hopping someone has run into this, any help would be much
appreciated.
STH
--
Scott T. Hildreth <[EMAIL PROTECTED]>
