"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "Basic/Core/pdlaffine.c" 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).

pdlaffine.c  (PDL-2.079):pdlaffine.c  (PDL-2.080)
skipping to change at line 98 skipping to change at line 98
for (i=0; i<$COMP(nd); i++) { for (i=0; i<$COMP(nd); i++) {
$COMP(sdims)[i] = dims[i]; $COMP(sdims)[i] = dims[i];
$COMP(sincs)[i] = incs[i]; $COMP(sincs)[i] = incs[i];
} }
', ',
RedoDims => ' RedoDims => '
PDL_Indx i; PDL_Indx i;
$SETNDIMS($COMP(nd)); $SETNDIMS($COMP(nd));
$DOPRIVALLOC(); $DOPRIVALLOC();
$PRIV(offs) = $COMP(offset); $PRIV(offs) = $COMP(offset);
for (i=0;i<$CHILD(ndims);i++) { for (i=0;i<$PDL(CHILD)->ndims;i++) {
$PRIV(incs)[i] = $COMP(sincs)[i]; $PRIV(incs)[i] = $COMP(sincs)[i];
$CHILD(dims)[i] = $COMP(sdims)[i]; $PDL(CHILD)->dims[i] = $COMP(sdims)[i];
} }
$SETDIMS(); $SETDIMS();
', ',
Doc => undef, Doc => undef,
); );
*/ */
typedef struct pdl_params_affine { typedef struct pdl_params_affine {
PDL_Indx nd; PDL_Indx nd;
PDL_Indx offset; PDL_Indx offset;
 End of changes. 2 change blocks. 
2 lines changed or deleted 2 lines changed or added

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