Changeset 294 for IO_handling

Timestamp:

10/11/04 16:31:49 (15 years ago)

Author:

jkettleb

Message:

Fixed indexing but in pp_copy_data.
CV: ----------------------------------------------------------------------

File:

• IO_handling/trunk/ppio/cdat-4.0b3-ppio_v0.3.patch (modified) (4 diffs)

IO_handling/trunk/ppio/cdat-4.0b3-ppio_v0.3.patch

@@ -3104 +3104 @@
 diff -Naur cdat-4.0b3/libcdms/src/cdunif/cdunifpp/cdunifpp_data.c cdat-4.0b3-pp/libcdms/src/cdunif/cdunifpp/cdunifpp_data.c
 --- cdat-4.0b3/libcdms/src/cdunif/cdunifpp/cdunifpp_data.c      1970-01-01 01:00:00.000000000 +0100
-+++ cdat-4.0b3-pp/libcdms/src/cdunif/cdunifpp/cdunifpp_data.c   2004-11-09 17:01:47.000000000 +0000
++++ cdat-4.0b3-pp/libcdms/src/cdunif/cdunifpp/cdunifpp_data.c   2004-11-10 15:32:23.000000000 +0000
 @@ -0,0 +1,185 @@
 +/*
@@ -3181 +3181 @@
 +    srcoffset=0;
 +    destoffset=0;
-+    for (idim=ndim-1 ; idim>=0; idim--) {
++    for (idim=0; idim < ndim ; idim++) {
 +      srcoffset *= size[idim];      
 +      destoffset *= count[idim];
@@ -3196 +3196 @@
 +
 +    /* increment indices */
-+    for (idim=0; idim < ndim ; idim++) {
++    for (idim=ndim-1 ; idim>=0; idim--) {
 +      indices[idim]++;
 +      if (indices[idim]==count[idim])
@@ -3203 +3203 @@
 +       break; /* no internal carry */
 +    }
-+    if (idim==ndim)
++    if (idim<0)
 +      carryout=1;
 +  }