Your message dated Sun, 25 Oct 2009 19:18:53 +0200
with message-id <[email protected]>
and subject line Re: state of #171547
has caused the Debian Bug report #171547,
regarding Lvalue Subs Fail Under Debugger
to be marked as done.

This means that you claim that the problem has been dealt with.
If this is not the case it is now your responsibility to reopen the
Bug report if necessary, and/or fix the problem forthwith.

(NB: If you are a system administrator and have no idea what this
message is talking about, this may indicate a serious mail system
misconfiguration somewhere. Please contact [email protected]
immediately.)


-- 
171547: http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=171547
Debian Bug Tracking System
Contact [email protected] with problems
--- Begin Message ---
Package: perl
Version: 5.6.1-8
Severity: normal
Tags: woody

The following script behaves differently under normal execution and
under the debugger:

---------8<---cut here---8<---------
#!/usr/bin/perl

require v5.6;
use strict;
use warnings;

my $f = 'JAPH';

sub f() : lvalue
{
        $f;
}

print "$f\n";
print f(), "\n";
f() = 'Just another Perl hacker,';
print "$f\n";

print '=' x 32, "\n";

# eof
---------8<---cut here---8<---------
$ perl ./bug1 ; PERLDB_OPTS='NonStop' perl -d ./bug1
JAPH
JAPH
Just another Perl hacker,
================================
Default die handler restored.
JAPH
JAPH
JAPH
================================
---------8<---cut here---8<---------

The lvalue assignment doesn't take place under the debugger.

(perlsub's characterization of lvalue assignments as "experimental" is
duly noted.)

perl -V output below.

Jason B.

---------8<---cut here---8<---------
Summary of my perl5 (revision 5.0 version 6 subversion 1) configuration:
  Platform:
    osname=linux, osvers=2.4.19-xfs, archname=i386-linux
    uname='linux ernie 2.4.19-xfs #1 mon aug 26 10:45:20 est 2002 i686 unknown '
    config_args='-Dccflags=-DDEBIAN -Dcccdlflags=-fPIC -Darchname=i386-linux 
-Dprefix=/usr -Dprivlib=/usr/share/perl/5.6.1 -Darchlib=/usr/lib/perl/5.6.1 
-Dvendorprefix=/usr -Dvendorlib=/usr/share/perl5 -Dvendorarch=/usr/lib/perl5 
-Dsiteprefix=/usr/local -Dsitelib=/usr/local/share/perl/5.6.1 
-Dsitearch=/usr/local/lib/perl/5.6.1 -Dman1dir=/usr/share/man/man1 
-Dman3dir=/usr/share/man/man3 -Dman1ext=1 -Dman3ext=3perl 
-Dpager=/usr/bin/sensible-pager -Uafs -Ud_csh -Uusesfio -Duseshrplib 
-Dlibperl=libperl.so.5.6.1 -Dd_dosuid -des'
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=undef use5005threads=undef useithreads=undef 
usemultiplicity=undef
    useperlio=undef d_sfio=undef uselargefiles=define usesocks=undef
    use64bitint=undef use64bitall=undef uselongdouble=undef
  Compiler:
    cc='cc', ccflags ='-DDEBIAN -fno-strict-aliasing -I/usr/local/include 
-D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
    optimize='-O2',
    cppflags='-DDEBIAN -fno-strict-aliasing -I/usr/local/include'
    ccversion='', gccversion='2.95.4 20011002 (Debian prerelease)', 
gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', 
lseeksize=8
    alignbytes=4, usemymalloc=n, prototype=define
  Linker and Libraries:
    ld='cc', ldflags =' -L/usr/local/lib'
    libpth=/usr/local/lib /lib /usr/lib
    libs=-lgdbm -ldb -ldl -lm -lc -lcrypt
    perllibs=-ldl -lm -lc -lcrypt
    libc=/lib/libc-2.2.5.so, so=so, useshrplib=true, libperl=libperl.so.5.6.1
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic'
    cccdlflags='-fPIC', lddlflags='-shared -L/usr/local/lib'


Characteristics of this binary (from libperl): 
  Compile-time options: USE_LARGE_FILES
  Built under linux
  Compiled at Nov 20 2002 23:12:45
  @INC:
    /usr/local/lib/perl/5.6.1
    /usr/local/share/perl/5.6.1
    /usr/lib/perl5
    /usr/share/perl5
    /usr/lib/perl/5.6.1
    /usr/share/perl/5.6.1
    /usr/local/lib/site_perl
    .



--- End Message ---
--- Begin Message ---
Version: 5.10.1-1

Jason Bucata wrote:
> On Sun, Oct 25, 2009 at 06:37:31PM +0200, Eugene V. Lyubimkin wrote:
>> Works for me as of Perl 5.10.1-5, do you confirm?
> 
> My debian laptop is still on etch, so I'm not in an easy position to test.
> If it works for you then I'm content.
> 
And I also just found in perldelta (for 5.10.1):

"perl5db.pl
           "LVALUE" subroutines now work under the debugger.
"

I marked the bug as closed in 5.10.1.

-- 
Eugene V. Lyubimkin aka JackYF, JID: jackyf.devel(maildog)gmail.com
C++/Perl developer, Debian Developer

Attachment: signature.asc
Description: OpenPGP digital signature


--- End Message ---

Reply via email to