"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "GENERATED/PDL/IO/Misc.pm" between
PDL-2.079.tar.gz and PDL-2.080.tar.gz

About: PDL (Perl Data Language) aims to turn perl into an efficient numerical language for scientific computing (similar to IDL and MatLab).

Misc.pm  (PDL-2.079):Misc.pm  (PDL-2.080)
skipping to change at line 53 skipping to change at line 53
use PDL::Primitive; use PDL::Primitive;
use PDL::Types; use PDL::Types;
use PDL::Options; use PDL::Options;
use PDL::Bad; use PDL::Bad;
use Carp; use Carp;
use Symbol qw/ gensym /; use Symbol qw/ gensym /;
use List::Util; use List::Util;
use strict; use strict;
#line 68 "Misc.pm" #line 68 "Misc.pm"
#line 1058 "../../blib/lib/PDL/PP.pm" #line 948 "../../blib/lib/PDL/PP.pm"
=head2 bswap2 =head2 bswap2
=for sig =for sig
Signature: (x(); ) Signature: (x(); )
=for ref =for ref
Swaps pairs of bytes in argument x() Swaps pairs of bytes in argument x()
=for bad =for bad
bswap2 does not process bad values. bswap2 does not process bad values.
It will set the bad-value flag of all output ndarrays if the flag is set for any of the input ndarrays. It will set the bad-value flag of all output ndarrays if the flag is set for any of the input ndarrays.
=cut =cut
#line 93 "Misc.pm" #line 93 "Misc.pm"
#line 1060 "../../blib/lib/PDL/PP.pm" #line 950 "../../blib/lib/PDL/PP.pm"
*bswap2 = \&PDL::bswap2; *bswap2 = \&PDL::bswap2;
#line 100 "Misc.pm" #line 100 "Misc.pm"
#line 1058 "../../blib/lib/PDL/PP.pm" #line 948 "../../blib/lib/PDL/PP.pm"
=head2 bswap4 =head2 bswap4
=for sig =for sig
Signature: (x(); ) Signature: (x(); )
=for ref =for ref
Swaps quads of bytes in argument x() Swaps quads of bytes in argument x()
=for bad =for bad
bswap4 does not process bad values. bswap4 does not process bad values.
It will set the bad-value flag of all output ndarrays if the flag is set for any of the input ndarrays. It will set the bad-value flag of all output ndarrays if the flag is set for any of the input ndarrays.
=cut =cut
#line 125 "Misc.pm" #line 125 "Misc.pm"
#line 1060 "../../blib/lib/PDL/PP.pm" #line 950 "../../blib/lib/PDL/PP.pm"
*bswap4 = \&PDL::bswap4; *bswap4 = \&PDL::bswap4;
#line 132 "Misc.pm" #line 132 "Misc.pm"
#line 1058 "../../blib/lib/PDL/PP.pm" #line 948 "../../blib/lib/PDL/PP.pm"
=head2 bswap8 =head2 bswap8
=for sig =for sig
Signature: (x(); ) Signature: (x(); )
=for ref =for ref
Swaps octets of bytes in argument x() Swaps octets of bytes in argument x()
=for bad =for bad
bswap8 does not process bad values. bswap8 does not process bad values.
It will set the bad-value flag of all output ndarrays if the flag is set for any of the input ndarrays. It will set the bad-value flag of all output ndarrays if the flag is set for any of the input ndarrays.
=cut =cut
#line 157 "Misc.pm" #line 157 "Misc.pm"
#line 1060 "../../blib/lib/PDL/PP.pm" #line 950 "../../blib/lib/PDL/PP.pm"
*bswap8 = \&PDL::bswap8; *bswap8 = \&PDL::bswap8;
#line 164 "Misc.pm" #line 164 "Misc.pm"
#line 124 "misc.pd" #line 124 "misc.pd"
# Internal routine to extend PDL array by size $n along last dimension # Internal routine to extend PDL array by size $n along last dimension
# - Would be nice to have a proper extend function rather than hack # - Would be nice to have a proper extend function rather than hack
# - Is a NO-OP when handed a perl ARRAY ref rather than an ndarray arg # - Is a NO-OP when handed a perl ARRAY ref rather than an ndarray arg
sub _ext_lastD { # Called by rcols and rgrep sub _ext_lastD { # Called by rcols and rgrep
skipping to change at line 1286 skipping to change at line 1286
} }
$tmp = $cube->slice(":,:,($k)"); $tmp = $cube->slice(":,:,($k)");
$tmp .= $im; $tmp .= $im;
$k++; $k++;
} }
return $cube; return $cube;
} }
#line 1340 "Misc.pm" #line 1340 "Misc.pm"
#line 1060 "../../blib/lib/PDL/PP.pm" #line 950 "../../blib/lib/PDL/PP.pm"
*_rasc = \&PDL::_rasc; *_rasc = \&PDL::_rasc;
#line 1347 "Misc.pm" #line 1347 "Misc.pm"
#line 27 "misc.pd" #line 27 "misc.pd"
=head1 AUTHOR =head1 AUTHOR
Copyright (C) Karl Glazebrook 1997, Craig DeForest 2001, Copyright (C) Karl Glazebrook 1997, Craig DeForest 2001,
2003, and Chris Marshall 2010. All rights reserved. There is 2003, and Chris Marshall 2010. All rights reserved. There is
 End of changes. 7 change blocks. 
7 lines changed or deleted 7 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)