search

Perl / perl5

🐪 The Perl programming language
https://dev.perl.org/perl5/
Other
1.84k stars 524 forks source link

splice(@_,0,1,'x') crashes at runtime #1105

Closed p5pRT closed 20 years ago

p5pRT commented 24 years ago

Migrated from rt.perl.org#2059 (status was 'resolved')

Searchable as RT2059$

p5pRT commented 24 years ago

From wolfgang.laun@alcatel.at

Created by Wolfgang.Laun@alcatel.at

This perl program crashes (see below)​:

#! /tag/mt/bin/perl5.00503 use strict; my $i; sub p {   splice( @​_\, $i\, 0\, '-!-' );   print "arg​: @​_\n"; } my @​a = qw( A B C D E ); for( $i = 0; $i \< @​a; $i++ ){   p( @​a ); }

arg​: -!- A B C D E Assertion failed​: file "pp.c"\, line 2662 at ./xxx.pl line 8.

Perl version 5.00405 does not show this bug.

Perl Info ``` This perlbug was built using Perl 5.00405 - Mon Jun 21 09:06:51 MET DST 1999 It is being executed now by Perl 5.00503 - Mon Jun 21 16:01:58 MET DST 1999. Site configuration information for perl 5.00503: Configured by giersig at Mon Jun 21 16:01:58 MET DST 1999. Summary of my perl5 (5.0 patchlevel 5 subversion 3) configuration: Platform: osname=solaris, osvers=2.5.1, archname=sun4-solaris-thread uname='sunos atusels1 5.5.1 generic_103640-24 sun4u sparc sunw,ultra-4 ' hint=recommended, useposix=true, d_sigaction=define usethreads=define useperlio=undef d_sfio=undef Compiler: cc='/tag/mt/bin/gcc -B/usr/ccs/bin/', optimize='-O -g', gccversion=2.9-gnupro-98r1 cppflags='-D_REENTRANT -DDEBUGGING -I/tag/mt/include -I/tag/mt/fsf/include -I/usr/GNU/include' ccflags ='-D_REENTRANT -DDEBUGGING -I/tag/mt/include -I/tag/mt/fsf/include -I/usr/GNU/include' stdchar='unsigned char', d_stdstdio=define, usevfork=false intsize=4, longsize=4, ptrsize=4, doublesize=8 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16 alignbytes=8, usemymalloc=y, prototype=define Linker and Libraries: ld='/tag/mt/bin/gcc -B/usr/ccs/bin/', ldflags ='-L/tag/mt/lib -L/tag/mt/fsf/lib -L/usr/GNU/lib' libpth=/tag/mt/lib /tag/mt/fsf/lib /usr/GNU/lib /lib /usr/lib /usr/ccs/lib libs=-lsocket -lnsl -lgdbm -ldl -lm -lposix4 -lpthread -lc -lcrypt libc=/lib/libc.so, so=so, useshrplib=false, libperl=libperl.a Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags=' ' cccdlflags='-fPIC', lddlflags='-G -L/tag/mt/lib -L/tag/mt/fsf/lib -L/usr/GNU/lib' Locally applied patches: @INC for perl 5.00503: /tag/mt/fsf/lib/perl5/5.00503/sun4-solaris-thread /tag/mt/fsf/lib/perl5/5.00503 /tag/mt/fsf/lib/perl5/site_perl/5.005/sun4-solaris-thread /tag/mt/fsf/lib/perl5/site_perl/5.005 . Environment for perl 5.00503: HOME=/users/tas/laune LANG (unset) LD_LIBRARY_PATH= LOGDIR (unset) PATH=:/users/el486t/cygnus/gnubin/solaris/sun4/bin:/users/elektra/el_vobadm/setup:/users/elektra/el_vobadm/setup/../bin:/usr/atria/bin:/tools/pure/bin:/usr/openwin/bin:/usr/GNU/bin:/tools/tex/solaris/bin:/usr/X11R6/bin:/usr/local/bin:/usr/AAA/bin:/usr/bin:/usr/ucb:/elektra/tools/make_sys:/elektra/vobs/makehome/scripts:/users/tas/laune/bin PERL_BADLANG (unset) SHELL=/usr/GNU/bin/bash ```
p5pRT commented 24 years ago

From @gsar

On Mon\, 31 Jan 2000 14​:04​:37 +0100\, Wolfgang Laun wrote​:

arg​: -!- A B C D E Assertion failed​: file "pp.c"\, line 2662 at ./xxx.pl line 8.

Perl version 5.00405 does not show this bug.

As doesn't 5.005_63.

Sarathy gsar@​ActiveState.com