On Tue, Jun 22, 2010 at 5:32 PM, Chris Marshall <[email protected]> wrote:
>  I don't think these errors have anything to do with
> FlexRaw or FastRaw.  Take a look at the file and line
> of the error to see what routine has the problem.
>

I am so sorry for misleading... yes, the errors are not with
(Flex|Fast)Raw but with Core.pm. I posted the lines (line 936 onward)
in an earlier thread. It is the PDL::dummy sub

sub PDL::dummy($$;$) {
   my ($pdl,$dim,$size) = @_;
   $dim = $pdl->getndims+1+$dim if $dim < 0;
   $size = 1 unless defined($size);

   barf("For safety, <pos> < -(dims+1) forbidden in dummy.  min="
         . -($pdl->getndims+1).", pos=". ($dim-1-$pdl->getndims) ) if($dim<0);

   my($s) = ',' x ( ($dim > $pdl->getndims) ? ($pdl->getndims) : ($dim) );
   $s .= '*,' x ( $dim-$pdl->getndims-1 );
   $s .= "*$size";

   $pdl->slice($s);
}

> Cheers,
> Chris
>
>
>
> Punkish writes:
>>
>> But, I also continue to get the following errors from my short little
>> program (Perl 5.12.1, PDL 2.4.6) --
>>
>>     my @dat = (1234, 123, 1, 0, 245, 5, 546, 10);
>>     my $row = ones(short, $x)->dummy * pdl(short, @dat);
>>     my $img = ones(short, $y)->dummy->dummy * $row;
>>     my $hdr = writefraw($img, 'pdl.dat');
>>
>> Use of uninitialized value $dim in numeric lt (<) at
>> /usr/local/lib/perl5/site_perl/5.12.1/darwin-2level/PDL/Core.pm line
>> 936.
>> ...
>



-- 
Puneet Kishor http://www.punkish.org
Carbon Model http://carbonmodel.org
Charter Member, Open Source Geospatial Foundation http://www.osgeo.org
Science Commons Fellow, http://sciencecommons.org/about/whoweare/kishor
Nelson Institute, UW-Madison http://www.nelson.wisc.edu
-----------------------------------------------------------------------
Assertions are politics; backing up assertions with evidence is science
=======================================================================

_______________________________________________
Perldl mailing list
[email protected]
http://mailman.jach.hawaii.edu/mailman/listinfo/perldl

Reply via email to