Skip Menu |

Preferred bug tracker

Please visit the preferred bug tracker to report your issue.

This queue is for tickets about the PDL CPAN distribution.

Report information
The Basics
Id: 37000
Status: resolved
Priority: 0/
Queue: PDL

People
Owner: Nobody in particular
Requestors: CASIANO [...] cpan.org
Cc: casiano.rodriguez.leon [...] gmail.com
AdminCc:

Bug Information
Severity: Important
Broken in: 2.4.3
Fixed in: 2.4.4



CC: casiano.rodriguez.leon [...] gmail.com
Thanks for your wonderful PDL project. <p> There seems to be a bug with the overload of <pre>""</pre>. See the debugger session below: <pre> DB<1> use PDL DB<2> use PDL::Complex DB<3> $x = r2C(-27) DB<4> $r = Croots $x, 3 DB<5> print $r Use of uninitialized value in numeric eq (==) at /usr/lib/perl5/PDL/Complex.pm line 1309. at /usr/lib/perl5/PDL/Complex.pm line 1309 .................. # etc, etc. skipped DB::DB called at -e line 1 [1.5 +2.59807621135332i -3 +3.67381906146713e-16i 1.5 -2.59807621135332i] </pre> <p> Best wishes <p> Casiano
Subject: cannot reproduce this with PDL-2.4.3 or CVS
I am unable to reproduce this problem with PDL-2.4.3 on cygwin or PDL-cvs on cygwin: Show quoted text
> $ perl -d -e 1 > > Loading DB routines from perl5db.pl version 1.28 > Editor support available. > > Enter h or `h h' for help, or `man perldebug' for more help. > > main::(-e:1): 1 > DB<1> use PDL > > DB<2> use PDL::Complex > > DB<3> $x = r2C( -27 ) > > DB<4> $r = Croots $x, 3 > > DB<5> print $r > [1.5 +2.59807621135332i -3 +3.67394039744206e-16i 1.5
-2.59807621135332i] Show quoted text
>
Please see the BUGS file in the PDL-2.4.3 distribution for the information needed to complete this bug report. Thanks!
Subject: Re: [rt.cpan.org #37000] cannot reproduce this with PDL-2.4.3 or CVS
Date: Fri, 27 Jun 2008 09:10:11 +0100
To: bug-PDL [...] rt.cpan.org
From: "Casiano Rodriguez-Leon" <casiano.rodriguez.leon [...] gmail.com>
Thanks Chris, Is a Debian distribution: pp2@nereida:~/src/perl/GRID_Machine/scripts$ cat /proc/version Linux version 2.6.18-5-686 (Debian 2.6.18.dfsg.1-17) (dannf@debian.org) (gcc version 4.1.2 20061115 (prerelease) (Debian 4.1.1-21)) #1 SMP Mon Dec 24 16:41:07 UTC 2007 pp2@nereida:~/src/perl/GRID_Machine/scripts$ uname -a Linux nereida.deioc.ull.es 2.6.18-5-686 #1 SMP Mon Dec 24 16:41:07 UTC 2007 i686 GNU/Linux **************************************************************** The Perl interpreter is: pp2@nereida:~/src/perl/GRID_Machine/scripts$ perl -V Summary of my perl5 (revision 5 version 8 subversion 8) configuration: Platform: osname=linux, osvers=2.6.24.4, archname=i486-linux-gnu-thread-multi uname='linux ninsei 2.6.24.4 #1 smp preempt fri apr 18 15:36:09 pdt 2008 i686 gnulinux ' config_args='-Dusethreads -Duselargefiles -Dccflags=-DDEBIAN -Dcccdlflags=-fPIC -Darchname=i486-linux-gnu -Dprefix=/usr -Dprivlib=/usr/share/perl/5.8 -Darchlib=/usr/lib/perl/5.8 -Dvendorprefix=/usr -Dvendorlib=/usr/share/perl5 -Dvendorarch=/usr/lib/perl5 -Dsiteprefix=/usr/local -Dsitelib=/usr/local/share/perl/5.8.8 -Dsitearch=/usr/local/lib/perl/5.8.8 -Dman1dir=/usr/share/man/man1 -Dman3dir=/usr/share/man/man3 -Dsiteman1dir=/usr/local/man/man1 -Dsiteman3dir=/usr/local/man/man3 -Dman1ext=1 -Dman3ext=3perl -Dpager=/usr/bin/sensible-pager -Uafs -Ud_csh -Uusesfio -Uusenm -Duseshrplib -Dlibperl=libperl.so.5.8.8 -Dd_dosuid -des' hint=recommended, useposix=true, d_sigaction=define usethreads=define use5005threads=undef useithreads=define usemultiplicity=define useperlio=define d_sfio=undef uselargefiles=define usesocks=undef use64bitint=undef use64bitall=undef uselongdouble=undef usemymalloc=n, bincompat5005=undef Compiler: cc='cc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAVE_PIDS -DDEBIAN -fno-strict-aliasing -pipe -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64', optimize='-O2', cppflags='-D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAVE_PIDS -DDEBIAN -fno-strict-aliasing -pipe -I/usr/local/include' ccversion='', gccversion='4.1.2 20061115 (prerelease) (Debian 4.1.1-21)', 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, prototype=define Linker and Libraries: ld='cc', ldflags =' -L/usr/local/lib' libpth=/usr/local/lib /lib /usr/lib libs=-lgdbm -lgdbm_compat -ldb -ldl -lm -lpthread -lc -lcrypt perllibs=-ldl -lm -lpthread -lc -lcrypt libc=/lib/libc-2.3.6.so, so=so, useshrplib=true, libperl=libperl.so.5.8.8 gnulibc_version='2.3.6' Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E' cccdlflags='-fPIC', lddlflags='-shared -L/usr/local/lib' Characteristics of this binary (from libperl): Compile-time options: MULTIPLICITY PERL_IMPLICIT_CONTEXT PERL_MALLOC_WRAP THREADS_HAVE_PIDS USE_ITHREADS USE_LARGE_FILES USE_PERLIO USE_REENTRANT_API Built under linux Compiled at Apr 25 2008 20:23:05 %ENV: PERL5LIB="/home/pp2/src/perl/GRID_Machine/lib" @INC: /home/pp2/src/perl/GRID_Machine/lib /etc/perl /usr/local/lib/perl/5.8.8 /usr/local/share/perl/5.8.8 /usr/lib/perl5 /usr/share/perl5 /usr/lib/perl/5.8 /usr/share/perl/5.8 /usr/local/lib/site_perl /usr/local/lib/perl/5.8.7 /usr/local/share/perl/5.8.7 /usr/local/lib/perl/5.8.4 /usr/local/share/perl/5.8.4 . **************************************************** I have tried in another Debian machine and have the same negative result. This time the version is: casiano@beowulf:~$ cat /proc/version Linux version 2.6.15-1-686-smp (Debian 2.6.15-8) (waldi@debian.org) (gcc version 4.0.3 20060212 (prerelease) (Debian 4.0.2-9)) #2 SMP Mon Mar 6 15:34:50 UTC 2006 ******************* Hope it helps *********************************** 2008/6/27 Chris Marshall via RT <bug-PDL@rt.cpan.org>: Show quoted text
> <URL: http://rt.cpan.org/Ticket/Display.html?id=37000 > > > I am unable to reproduce this problem with PDL-2.4.3 on cygwin > or PDL-cvs on cygwin: >
>> $ perl -d -e 1 >> >> Loading DB routines from perl5db.pl version 1.28 >> Editor support available. >> >> Enter h or `h h' for help, or `man perldebug' for more help. >> >> main::(-e:1): 1 >> DB<1> use PDL >> >> DB<2> use PDL::Complex >> >> DB<3> $x = r2C( -27 ) >> >> DB<4> $r = Croots $x, 3 >> >> DB<5> print $r >> [1.5 +2.59807621135332i -3 +3.67394039744206e-16i 1.5
> -2.59807621135332i]
>>
> > Please see the BUGS file in the PDL-2.4.3 distribution > for the information needed to complete this bug report. > > Thanks! >
Are you running the PDL that comes with Debian or your own build? What's the output of perldoc -l PDL I do not have this problem on my private build of 2.4.3 on either Debian Etch (4.0) x86_64 and Debian Sarge (3.1) i686. % perl -MPDL -MPDL::Complex -le '$x = r2C(-27); $r = Croots $x, 3; print $r;' [1.5 +2.59807621135332i -3 +3.67394039744206e-16i 1.5 -2.59807621135332i]
Subject: cannot determine PDL-2.4.3 errors from reports to date
Hi Casiano, None none of the attachments here or in the e-mails have any error messages in them. (Even the initial problem with complex stringification does not show an error message in the report, just what may be part of a warning. I think that specific issue has been fixed in CVS)) If you can generate output with an error message from the PDL build and install, I will take another look. Here is what I do for a really clean PDL install: 1. untar the distribution into a directory 2. cd PDL-2.4.3 3. perl Makefile.PL 2>&1 | tee -a ../pdl-build-log.txt 4. make 2>&1 | tee -a ../pdl-build-log.txt 5. make test 2>&1 | tee -a ../pdl-build-log.txt At this point, if tests have passed then PDL was built correctly. You should be able to do 6. perl -Mblib perldl which starts the perldl shell where you can run demo or perform interactive PDL computations. Best wishes and sorry I could not help more. --Chris On Fri Jun 27 04:10:41 2008, casiano.rodriguez.leon@gmail.com wrote: Show quoted text
> Thanks Chris, > > Is a Debian distribution: > > pp2@nereida:~/src/perl/GRID_Machine/scripts$ cat /proc/version > Linux version 2.6.18-5-686 (Debian 2.6.18.dfsg.1-17) > (dannf@debian.org) (gcc version 4.1.2 20061115 (prerelease) (Debian > 4.1.1-21)) #1 SMP Mon Dec 24 16:41:07 UTC 2007 > > > pp2@nereida:~/src/perl/GRID_Machine/scripts$ uname -a > Linux nereida.deioc.ull.es 2.6.18-5-686 #1 SMP Mon Dec 24 16:41:07 UTC > 2007 i686 GNU/Linux > > **************************************************************** > The Perl interpreter is: > > pp2@nereida:~/src/perl/GRID_Machine/scripts$ perl -V > Summary of my perl5 (revision 5 version 8 subversion 8) configuration: > Platform: > osname=linux, osvers=2.6.24.4, archname=i486-linux-gnu-thread- > multi > uname='linux ninsei 2.6.24.4 #1 smp preempt fri apr 18 15:36:09 > pdt 2008 i686 gnulinux ' > config_args='-Dusethreads -Duselargefiles -Dccflags=-DDEBIAN > -Dcccdlflags=-fPIC -Darchname=i486-linux-gnu -Dprefix=/usr > -Dprivlib=/usr/share/perl/5.8 -Darchlib=/usr/lib/perl/5.8 > -Dvendorprefix=/usr -Dvendorlib=/usr/share/perl5 > -Dvendorarch=/usr/lib/perl5 -Dsiteprefix=/usr/local > -Dsitelib=/usr/local/share/perl/5.8.8 > -Dsitearch=/usr/local/lib/perl/5.8.8 -Dman1dir=/usr/share/man/man1 > -Dman3dir=/usr/share/man/man3 -Dsiteman1dir=/usr/local/man/man1 > -Dsiteman3dir=/usr/local/man/man3 -Dman1ext=1 -Dman3ext=3perl > -Dpager=/usr/bin/sensible-pager -Uafs -Ud_csh -Uusesfio -Uusenm > -Duseshrplib -Dlibperl=libperl.so.5.8.8 -Dd_dosuid -des' > hint=recommended, useposix=true, d_sigaction=define > usethreads=define use5005threads=undef useithreads=define > usemultiplicity=define > useperlio=define d_sfio=undef uselargefiles=define usesocks=undef > use64bitint=undef use64bitall=undef uselongdouble=undef > usemymalloc=n, bincompat5005=undef > Compiler: > cc='cc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAVE_PIDS > -DDEBIAN -fno-strict-aliasing -pipe -I/usr/local/include > -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64', > optimize='-O2', > cppflags='-D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAVE_PIDS -DDEBIAN > -fno-strict-aliasing -pipe -I/usr/local/include' > ccversion='', gccversion='4.1.2 20061115 (prerelease) (Debian > 4.1.1-21)', 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, prototype=define > Linker and Libraries: > ld='cc', ldflags =' -L/usr/local/lib' > libpth=/usr/local/lib /lib /usr/lib > libs=-lgdbm -lgdbm_compat -ldb -ldl -lm -lpthread -lc -lcrypt > perllibs=-ldl -lm -lpthread -lc -lcrypt > libc=/lib/libc-2.3.6.so, so=so, useshrplib=true, > libperl=libperl.so.5.8.8 > gnulibc_version='2.3.6' > Dynamic Linking: > dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E' > cccdlflags='-fPIC', lddlflags='-shared -L/usr/local/lib' > > > Characteristics of this binary (from libperl): > Compile-time options: MULTIPLICITY PERL_IMPLICIT_CONTEXT > PERL_MALLOC_WRAP THREADS_HAVE_PIDS > USE_ITHREADS > USE_LARGE_FILES USE_PERLIO USE_REENTRANT_API > Built under linux > Compiled at Apr 25 2008 20:23:05 > %ENV: > PERL5LIB="/home/pp2/src/perl/GRID_Machine/lib" > @INC: > /home/pp2/src/perl/GRID_Machine/lib > /etc/perl > /usr/local/lib/perl/5.8.8 > /usr/local/share/perl/5.8.8 > /usr/lib/perl5 > /usr/share/perl5 > /usr/lib/perl/5.8 > /usr/share/perl/5.8 > /usr/local/lib/site_perl > /usr/local/lib/perl/5.8.7 > /usr/local/share/perl/5.8.7 > /usr/local/lib/perl/5.8.4 > /usr/local/share/perl/5.8.4 > . > > **************************************************** > I have tried in another Debian machine and have the same negative > result. > This time the version is: > > > casiano@beowulf:~$ cat /proc/version > Linux version 2.6.15-1-686-smp (Debian 2.6.15-8) (waldi@debian.org) > (gcc version 4.0.3 20060212 (prerelease) (Debian 4.0.2-9)) #2 SMP Mon > Mar 6 15:34:50 UTC 2006 > ******************* > > Hope it helps > > *********************************** > > 2008/6/27 Chris Marshall via RT <bug-PDL@rt.cpan.org>:
> > <URL: http://rt.cpan.org/Ticket/Display.html?id=37000 > > > > > I am unable to reproduce this problem with PDL-2.4.3 on cygwin > > or PDL-cvs on cygwin: > >
> >> $ perl -d -e 1 > >> > >> Loading DB routines from perl5db.pl version 1.28 > >> Editor support available. > >> > >> Enter h or `h h' for help, or `man perldebug' for more help. > >> > >> main::(-e:1): 1 > >> DB<1> use PDL > >> > >> DB<2> use PDL::Complex > >> > >> DB<3> $x = r2C( -27 ) > >> > >> DB<4> $r = Croots $x, 3 > >> > >> DB<5> print $r > >> [1.5 +2.59807621135332i -3 +3.67394039744206e-16i 1.5
> > -2.59807621135332i]
> >>
> > > > Please see the BUGS file in the PDL-2.4.3 distribution > > for the information needed to complete this bug report. > > > > Thanks! > >
Subject: Re: [rt.cpan.org #37000]
Date: Sat, 28 Jun 2008 10:20:47 +0100
To: bug-PDL [...] rt.cpan.org
From: "Casiano Rodriguez-Leon" <casiano.rodriguez.leon [...] gmail.com>
Hello, 2008/6/27 Diab Jerius via RT <bug-PDL@rt.cpan.org>: Show quoted text
> <URL: http://rt.cpan.org/Ticket/Display.html?id=37000 > > > Are you running the PDL that comes with Debian or your own build?
Yes Show quoted text
> What's the output of > > perldoc -l PDL >
nereida:/tmp/GraphViz-2.03/examples# perldoc -l PDL /usr/local/lib/perl/5.8.4/PDL.pm Show quoted text
> > I do not have this problem on my private build of 2.4.3 on either Debian > Etch (4.0) x86_64 and Debian Sarge (3.1) i686. > > % perl -MPDL -MPDL::Complex -le '$x = r2C(-27); $r = Croots $x, 3; print > $r;' > [1.5 +2.59807621135332i -3 +3.67394039744206e-16i 1.5 -2.59807621135332i] > >
Mmm ... yes I guess the problem is the version of Debian I have, not PDL. I am trying now to install it from CPAN ... I'll let you know the result when finishes ... Casiano
Subject: Re: [rt.cpan.org #37000]
Date: Sat, 28 Jun 2008 10:51:24 +0100
To: bug-PDL [...] rt.cpan.org
From: "Casiano Rodriguez-Leon" <casiano.rodriguez.leon [...] gmail.com>
Hello, I have installed PDL from CPAN now, but the result is the same. I have tracked the execution with the debugger in detail and this session points out where the problem is: ******************************************************************************* pp2@nereida:~/src/perl/GRID_Machine/tt2$ perl -wde 0 Loading DB routines from perl5db.pl version 1.28 Editor support available. Enter h or `h h' for help, or `man perldebug' for more help. main::(-e:1): 0 DB<1> use PDL; use PDL::Complex DB<2> $x = r2C(-27) DB<3> $r = Croots $x, 3 DB<4> print $r Use of uninitialized value in numeric eq (==) at /usr/local/lib/perl/5.8.8/PDL/Complex.pm line 1189. at /usr/local/lib/perl/5.8.8/PDL/Complex.pm line 1189 PDL::Complex::str1D('PDL::Complex=SCALAR(0x8abd9e0)', 'undef', '') called at /usr/local/lib/perl/5.8.8/PDL/Complex.pm line 1152 PDL::Complex::string('PDL::Complex=SCALAR(0x8abd9e0)', 'undef', '') called at (eval 63)[/usr/share/perl/5.8/perl5db.pl:628] line 2 eval '($@, $!, $^E, $,, $/, $\\, $^W) = @saved;package main; $^D = $^D | $DB::db_stop; print $r; ;' called at /usr/share/perl/5.8/perl5db.pl line 628 DB::eval called at /usr/share/perl/5.8/perl5db.pl line 3410 DB::DB called at -e line 1 Use of uninitialized value in numeric eq (==) at /usr/local/lib/perl/5.8.8/PDL/Complex.pm line 1190. at /usr/local/lib/perl/5.8.8/PDL/Complex.pm line 1190 PDL::Complex::str1D('PDL::Complex=SCALAR(0x8abd9e0)', 'undef', '') called at /usr/local/lib/perl/5.8.8/PDL/Complex.pm line 1152 PDL::Complex::string('PDL::Complex=SCALAR(0x8abd9e0)', 'undef', '') called at (eval 63)[/usr/share/perl/5.8/perl5db.pl:628] line 2 eval '($@, $!, $^E, $,, $/, $\\, $^W) = @saved;package main; $^D = $^D | $DB::db_stop; print $r; ;' called at /usr/share/perl/5.8/perl5db.pl line 628 DB::eval called at /usr/share/perl/5.8/perl5db.pl line 3410 DB::DB called at -e line 1 [1.5 +2.59807621135332i -3 +3.67381906146713e-16i 1.5 -2.59807621135332i] ********************************************************************************* # OK. Now I am going to repeat the same step but going into the involved subroutine: DB<5> s print $r main::((eval 66)[/usr/share/perl/5.8/perl5db.pl:628]:3): 3: print $r; DB<<7>> s PDL::Complex::(/usr/local/lib/perl/5.8.8/PDL/Complex.pm:1132): 1132: my($self,$format1,$format2)=@_; DB<<7>> c 1189 PDL::Complex::str1D(/usr/local/lib/perl/5.8.8/PDL/Complex.pm:1189): 1189: $dformat = $PDL::Complex::floatformat if $dtype == $PDL_F; DB<<8>> x $dtype 0 6 DB<<9>> x $PDL_F 0 undef DB<<10>> #OK. This is the problem!! I going to change PDL_F DB<<11>> $PDL_F = 8 # Is it the size of a float? I don't know DB<<12>> . PDL::Complex::str1D(/usr/local/lib/perl/5.8.8/PDL/Complex.pm:1189): 1189: $dformat = $PDL::Complex::floatformat if $dtype == $PDL_F; DB<<12>> l 1189==> $dformat = $PDL::Complex::floatformat if $dtype == $PDL_F; 1190: $dformat = $PDL::Complex::doubleformat if $dtype == $PDL_D; 1191 1192: $ret = "[" if $self->getndims() > 1; 1193: my $badflag = $self->badflag(); 1194: for($i=0; $i<=$#$x; $i++){ 1195: $t = $$x[$i]; 1196: if ( $badflag and $t eq "BAD" ) { 1197 # do nothing 1198 } elsif ($format1) { DB<<12>> n PDL::Complex::str1D(/usr/local/lib/perl/5.8.8/PDL/Complex.pm:1190): 1190: $dformat = $PDL::Complex::doubleformat if $dtype == $PDL_D; DB<<12>> x $PDL_D 0 undef DB<<13>> # Argh! The same. Is undef!!! This is the reason for the warns! DB<<14>> x $PDL_D = 8 0 8 DB<<15>> n PDL::Complex::str1D(/usr/local/lib/perl/5.8.8/PDL/Complex.pm:1192): 1192: $ret = "[" if $self->getndims() > 1; DB<<15>> c [1.5 +2.59807621135332i -3 +3.67381906146713e-16i 1.5 -2.59807621135332i] DB<15> *********************************************** As the session proves, the reason for the warnings is that variables $PDL_F and $PDL_D are undef when working with this version of Debian Best wishes Casiano
Subject: Out of Office AutoReply: [Perldl] [rt.cpan.org #37000]
Date: Tue, 8 Jul 2008 14:14:25 -0400
To: "Diab Jerius via RT" <bug-PDL [...] rt.cpan.org>
From: "Marshall, Christopher Dr CIV USA AMC" <chris.h.marshall [...] us.army.mil>
I am out of the office until 10-Jul-2008. Your message will be read on my return. Thank you.
Subject: Stringify problem for PDL::Complex items
This problem has been resolved in cvs for the forthcoming PDL-2.4.4 release. Please follow up via the sourceforge bug tracker for PDL accessible from http://sourceforge.net/projects/pdl/ where you will have a much faster response than on from bugs.cpan.org where the tickets are not immediately visible. Thanks.