Skip Menu |
Report information
Id: 4539
Status: resolved
Priority: 0/
Queue: perl5

Owner: Nobody
Requestors: dan [at] brumleve.com
Cc:
AdminCc:

Operating System: Linux
PatchStatus: (no value)
Severity: low
Type: library
Perl Version:
  • 5.6.0
  • 5.11.0
Fixed In: 5.22.0



Date: Sun, 29 Oct 2000 07:41:47 -0600
From: Dan Brumleve <dan [...] brumleve.com>
To: perlbug [...] perl.com
Subject: '&' prototype permits any non-single refgen
Cc: dan [...] brumleve.com
Download (untitled) / with headers
text/plain 2.5k
This is a bug report for perl from dan@www.brumleve.com, generated with the help of perlbug 1.28 running under perl v5.6.0. ----------------------------------------------------------------- # This happens in 5.7.0 as well... twumtwum$ perl -de0 # ... DB<1> sub foo(&) { @_ } DB<2> x foo(\(1,2)) 0 SCALAR(0x82448b4) -> 1 1 SCALAR(0x82448c0) -> 2 ----------------------------------------------------------------- --- Flags: category=core severity=low --- Site configuration information for perl v5.6.0: Configured by dan at Sun Apr 9 19:33:10 CDT 2000. Summary of my perl5 (revision 5.0 version 6 subversion 0) configuration: Platform: osname=linux, osvers=2.2.13, archname=i686-linux-thread-multi uname='linux www 2.2.13 #1 smp thu nov 11 05:30:30 cst 1999 i686 unknown ' config_args='-Dusethreads' hint=recommended, useposix=true, d_sigaction=define usethreads=define use5005threads=undef useithreads=define usemultiplicity=define useperlio=undef d_sfio=undef uselargefiles=define use64bitint=undef use64bitall=undef uselongdouble=undef usesocks=undef Compiler: cc='cc', optimize='-O2', gccversion=2.7.2.3 cppflags='-D_REENTRANT -I/usr/local/include' ccflags ='-D_REENTRANT -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64' stdchar='char', d_stdstdio=define, usevfork=false intsize=4, longsize=4, ptrsize=4, doublesize=8 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12 ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=4 alignbytes=4, usemymalloc=n, prototype=define Linker and Libraries: ld='cc', ldflags =' -L/usr/local/lib' libpth=/usr/local/lib /lib /usr/lib libs=-lndbm -lgdbm -ldbm -ldb -ldl -lm -lpthread -lc libc=/lib/libc-2.0.7.so, so=so, useshrplib=false, libperl=libperl.a Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic' cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib' Locally applied patches: --- @INC for perl v5.6.0: /usr/lib/perl5/5.6.0/i686-linux-thread-multi /usr/lib/perl5/5.6.0 /usr/lib/perl5/site_perl/5.6.0/i686-linux-thread-multi /usr/lib/perl5/site_perl/5.6.0 /usr/lib/perl5/site_perl . --- Environment for perl v5.6.0: HOME=/home/dan LANG (unset) LANGUAGE (unset) LD_LIBRARY_PATH (unset) LOGDIR (unset) PATH=/bin:/sbin:/usr/games:/usr/bin:/usr/sbin:/usr/scripts:/usr/local/bin:/home/users/sub/nothing/bin:. PERL_BADLANG (unset) SHELL=/bin/tcsh
RT-Send-CC: perl5-porters [...] perl.org
Download (untitled) / with headers
text/plain 501b
On Sat Oct 28 22:42:19 2000, dan@brumleve.com wrote: Show quoted text
> > This is a bug report for perl from dan@www.brumleve.com, > generated with the help of perlbug 1.28 running under perl v5.6.0. > > > ----------------------------------------------------------------- > > # This happens in 5.7.0 as well... > > twumtwum$ perl -de0 > # ... > DB<1> sub foo(&) { @_ } > > DB<2> x foo(\(1,2)) > 0 SCALAR(0x82448b4) > -> 1 > 1 SCALAR(0x82448c0) > -> 2
I fixed this in e41e9865be. -- Father Chrysostomos
Subject: Your ticket against Perl 5 has been resolved
Download (untitled) / with headers
text/plain 222b
Thanks for submitting this ticket The issue should be resolved with the release today of Perl v5.22. If you find that the problem persists, feel free to reopen this ticket -- Karl Williamson for the Perl 5 porters team


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

For issues related to this RT instance (aka "perlbug"), please contact perlbug-admin at perl.org