Front page | perl.perl5.porters |
Postings from April 2004
Re: [perl #28938] Bug Report
Thread Previous
|
Thread Next
From:
Steve Hay
Date:
April 28, 2004 06:59
Subject:
Re: [perl #28938] Bug Report
Message ID:
408FB98E.2080606@uk.radan.com
H.Merijn Brand wrote:
>On Mon 19 Apr 2004 05:18, Keyvan Mohajer (via RT) <perlbug-followup@perl.org> wrote:
>
>
>>The following code generates a "Segmentation fault" in Perl 5.8 but not in
>>Perl 5.6. Could you please help me?
>>
>>##############################################################
>>#!/usr/bin/perl
>>
>>$line=',,,,,,,,,,,,,,';
>>$title_index=13;
>>@temp_array=split(/,/,$line);
>>$new_mark=0;
>>$temp_array[$title_index]="$temp_array[$title_index]\,$new_mark";
>>@new_array=[@temp_array];
>>@new_array=[@temp_array];
>>##############################################################
>>
>>
>
>Not over here, though differences still exist ...
>
Bleadperl on Win32 gives an access violation. Stack trace:
Perl_sv_clear(interpreter * 0x00224054, sv * 0x00224f90) line 5910 + 5 bytes
Perl_sv_free2(interpreter * 0x00224054, sv * 0x00224f90) line 6144 + 13
bytes
Perl_sv_free(interpreter * 0x00224054, sv * 0x00224f90) line 6124 + 13 bytes
Perl_av_undef(interpreter * 0x00224054, av * 0x01827c48) line 500 + 32 bytes
Perl_sv_clear(interpreter * 0x00224054, sv * 0x01827c48) line 5942 + 13
bytes
Perl_sv_free2(interpreter * 0x00224054, sv * 0x01827c48) line 6144 + 13
bytes
Perl_sv_free(interpreter * 0x00224054, sv * 0x01827c48) line 6124 + 13 bytes
Perl_sv_clear(interpreter * 0x00224054, sv * 0x01827c6c) line 5974 + 17
bytes
Perl_sv_free2(interpreter * 0x00224054, sv * 0x01827c6c) line 6144 + 13
bytes
Perl_sv_free(interpreter * 0x00224054, sv * 0x01827c6c) line 6124 + 13 bytes
Perl_av_clear(interpreter * 0x00224054, av * 0x01827bf4) line 465 + 13 bytes
Perl_pp_aassign(interpreter * 0x00224054) line 1001 + 13 bytes
Perl_runops_debug(interpreter * 0x00224054) line 1564 + 13 bytes
S_run_body(interpreter * 0x00224054, long 1) line 1796 + 13 bytes
perl_run(interpreter * 0x00224054) line 1714 + 13 bytes
RunPerl(int 2, char * * 0x002224b8, char * * 0x00222a88) line 202 + 12 bytes
main(int 2, char * * 0x002224b8, char * * 0x00222a88) line 18 + 18 bytes
PERL! mainCRTStartup + 227 bytes
KERNEL32! 77e81
The line where it crashes is:
if (SvMAGIC(sv))
and the debugger shows sv->sv_any is 0x00000000 at this point, hence the
access violation given that sv.h has:
#define SvANY(sv) (sv)->sv_any
#define SvMAGIC(sv) ((XPVMG*) SvANY(sv))->xmg_magic
- Steve
------------------------------------------------
Radan Computational Ltd.
The information contained in this message and any files transmitted with it are confidential and intended for the addressee(s) only. If you have received this message in error or there are any problems, please notify the sender immediately. The unauthorized use, disclosure, copying or alteration of this message is strictly forbidden. Note that any views or opinions presented in this email are solely those of the author and do not necessarily represent those of Radan Computational Ltd. The recipient(s) of this message should check it and any attached files for viruses: Radan Computational will accept no liability for any damage caused by any virus transmitted by this email.
Thread Previous
|
Thread Next