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: 33367
Status: resolved
Priority: 0/
Queue: PDL

People
Owner: Nobody in particular
Requestors: rossiya [...] gmail.com
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: 2.4.3
Fixed in: 2.4.4



Subject: Re: PDL-2.4.3: Not a HASH reference at /usr/local/lib/perl5/site_perl/5.10.0/mach/PDL/Graphics/TriD/Objects.pm line 53, <> line 29.
Date: Sun, 17 Feb 2008 18:04:14 -0800
To: bug-PDL [...] rt.cpan.org
From: MC <rossiya [...] gmail.com>
Download (untitled) / with headers
text/plain 3.7k
Hello This bug evaporated when I reverted Perl back to 5.8.8, which is the current standard on FreeBSD. I don't think this has anything to do with PDL, as most perl modules ended up broken after the reversion. I don't know where to delete this bug report. However I now think it is a fluke related to the sea of code upon which PDL floats. On Dec 21, 2007 11:57 AM, MC <rossiya@gmail.com> wrote: Show quoted text
> Hello > > On Friday, 21Dec2007 I found this but in the PDL demo after upgrading > from perl 5.8.8 to perl 5.10.0: > > pocket:/trash/perl/usr/local/bin $ perldl
> perldl> demo 3d
> > ---- Code: > # Number of subdivisions for lines / surfaces. > $size = 25; > > $cz = (xvals zeroes $size+1) / $size; # interval 0..1 > $cx = sin($cz*12.6); # Corkscrew > $cy = cos($cz*12.6); > line3d [$cx,$cy,$cz]; # Draw a line > # [press 'q' in the graphics window when done] > ---- Output: > ---- > ---- > OOPS!!! Something went wrong, please make a bug report!: Not a HASH > reference at /usr/local/lib/perl5/site_perl/5.10.0/mach/PDL/Graphics/TriD/Objects.pm > line 53, <> line 29. > at /usr/local/lib/perl5/site_perl/5.10.0/mach/PDL/Graphics/TriD/Objects.pm > line 53 > PDL::Graphics::TriD::GObject::new('PDL::Graphics::TriD::LineStrip', > 'ARRAY(0x8c6f654)') called at > /usr/local/lib/perl5/site_perl/5.10.0/mach/PDL/Graphics/TriD.pm line > 685 > PDL::line3d('ARRAY(0x8c6f654)') called at (eval 568) line 8 > eval 'package PDL::Demos::TriD1; use PDL; > # Number of subdivisions for lines / surfaces. > $size = 25; > > $cz = (xvals zeroes $size+1) / $size; # interval 0..1 > $cx = sin($cz*12.6); # Corkscrew > $cy = cos($cz*12.6); > line3d [$cx,$cy,$cz]; # Draw a line > # [press \'q\' in the graphics window when done] > > ;' called at /usr/local/lib/perl5/site_perl/5.10.0/mach/PDL/Demos/Screen.pm > line 55 > PDL::Demos::Routines::actnw('\x{a}\x{9}# Number of > subdivisions for lines / surfaces.\x{a}\x{9}$size = 25;...') called at > /usr/local/lib/perl5/site_perl/5.10.0/mach/PDL/Demos/TriD1.pm line 37 > PDL::Demos::TriD1::run() called at /usr/local/bin/perldl line 388 > main::demo('3d') called at (eval 566) line 4 > main::__ANON__() called at /usr/local/bin/perldl line 644 > eval {...} called at /usr/local/bin/perldl line 644 > main::eval_and_report('demo \'3d\'') called at > /usr/local/bin/perldl line 583 > main::process_input() called at /usr/local/bin/perldl line 603 > eval {...} called at /usr/local/bin/perldl line 603 > > ------------------------------------------------------------------------------------------------------------ > > In perl debugger I got: > > PDL::Graphics::TriD::GObject::new(/usr/local/lib/perl5/site_perl/5.10.0/mach/PDL/Graphics/TriD/Objects.pm:53): > 53: $this->{Options} = $options; > DB<<18>> x $this->{Options} > Not a HASH reference at (eval > 342)[/usr/local/lib/perl5/5.10.0/perl5db.pl:638] line 2, <DATA> line > 387. > DB<<19>> x $this > 0 PDL::Graphics::TriD::LineStrip=ARRAY(0x910fb90) > 0 HASH(0x8f8af14) > 'ChangedSub' => 3 > 'Colors' => 7 > 'List' => 4 > 'Objects' => 1 > 'Options' => 8 > 'Points' => 6 > 'VRML' => 5 > 'ValidList' => 2 > DB<<20>> x $this->[0]->{Options} > 0 8 > DB<<21>> > > It would seem that perl 5.10 insists that $this points to an ARRAY, > whilst in perl5.8.8 $this is a HASH REF > > $ uname -a > FreeBSD pocket 6.2-RELEASE-p6 FreeBSD 6.2-RELEASE-p6 #1: Tue Jul 17 > 00:15:41 PDT 2007 root@pocket:/usr/obj/usr/src/sys/MC2 i386 > > I check the CPAN bug report system and seldom read this email address, > as I get thousands of emails here weekly. >
Download (untitled) / with headers
text/plain 116b
See http://sourceforge.net/tracker/?func=browse&group_id=612&atid=100612 bug # 1994617 for follow up and resolution.


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

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.