I've run into a dataflow/slice crash in perl/PDL-2.007_02 for large piddles (>2GiB in size). Here is a program that reproduces the crash for me on cygwin64 perl and on SPP. Both on the same win7 system.
The failure seems to be related to dataflow and slice but I really don't know enough about this affine slice stuff and dataflow implementation to even start to guess where to look. :-( If you have a PDL-2.007_02 install and >4GiB of RAM, I would appreciate if you would see if you can reproduce the problem and to determine if it is specific to windows somehow. --Chris #!/usr/bin/perl > # > use PDL; > use PDL::NiceSlice; > > $PDL::BIGPDL = 1; # maybe this should be the default > > $recs = ones(byte,3149824,998); > > print "\$recs(:,900)->sum is ", $recs(:,900)->sum, "\n"; > print "\$recs(:,910)->sum is ", $recs(:,910)->sum, "\n"; > print "\$recs(:,920)->sum is ", $recs(:,920)->sum, "\n"; > print "\$recs(:,930)->sum is ", $recs(:,930)->sum, "\n"; > print "\$recs(:,940)->sum is ", $recs(:,940)->sum, "\n"; > print "\$recs(:,950)->sum is ", $recs(:,950)->sum, "\n"; > print "\$recs(:,960)->sum is ", $recs(:,960)->sum, "\n"; > print "\$recs(:,970)->sum is ", $recs(:,970)->sum, "\n"; > print "\$recs(:,980)->sum is ", $recs(:,980)->sum, "\n"; > > $ufr = $recs(29:-4068); # After this...perl crashes > > print "\$ufr(:,900)->sum is ", $ufr(:,900)->sum, "\n"; > print "\$ufr(:,910)->sum is ", $ufr(:,910)->sum, "\n"; > print "\$ufr(:,920)->sum is ", $ufr(:,920)->sum, "\n"; > print "\$ufr(:,930)->sum is ", $ufr(:,930)->sum, "\n"; > print "\$ufr(:,940)->sum is ", $ufr(:,940)->sum, "\n"; > print "\$ufr(:,950)->sum is ", $ufr(:,950)->sum, "\n"; > print "\$ufr(:,960)->sum is ", $ufr(:,960)->sum, "\n"; > print "\$ufr(:,970)->sum is ", $ufr(:,970)->sum, "\n"; > print "\$ufr(:,980)->sum is ", $ufr(:,980)->sum, "\n"; > >
_______________________________________________ Perldl mailing list Perldl@jach.hawaii.edu http://mailman.jach.hawaii.edu/mailman/listinfo/perldl
