Changeset 1173 in Sophya for trunk/SophyaLib/TArray

Timestamp:

Sep 1, 2000, 4:40:36 PM (25 years ago)

Author:

ansari

Message:

Compil sous SGI-CC , Reza 1/9/2000

File:

• trunk/SophyaLib/TArray/fioarr.cc (modified) (2 diffs)

trunk/SophyaLib/TArray/fioarr.cc

@@ -116 +116 @@
 // entre version du programme utilisant int_4 OU int_8 pour sa_size_t 
   int_8 tmpi8s[BASEARRAY_MAXNDIMS];
+  int kk;
 
   is.Get(tmpi8s, BASEARRAY_MAXNDIMS);
-  for(int kk=0; kk<BASEARRAY_MAXNDIMS; kk++) 
+  for(kk=0; kk<BASEARRAY_MAXNDIMS; kk++) 
     dobj->size_[kk] = tmpi8s[kk];
   is.Get(tmpi8s, BASEARRAY_MAXNDIMS);
-  for(int kk=0; kk<BASEARRAY_MAXNDIMS; kk++) 
+  for(kk=0; kk<BASEARRAY_MAXNDIMS; kk++) 
     dobj->step_[kk] = tmpi8s[kk];
 
@@ -176 +177 @@
 // entre version du programme utilisant int_4 OU int_8 pour sa_size_t 
   int_8 tmpi8s[BASEARRAY_MAXNDIMS];
-
+  int kk;
   //  os.Put(dobj->size_, BASEARRAY_MAXNDIMS);
-  for(int kk=0; kk<BASEARRAY_MAXNDIMS; kk++) 
+  for(kk=0; kk<BASEARRAY_MAXNDIMS; kk++) 
     tmpi8s[kk] = dobj->size_[kk];
   os.Put(tmpi8s, BASEARRAY_MAXNDIMS);
   //  os.Put(dobj->step_, BASEARRAY_MAXNDIMS);
-  for(int kk=0; kk<BASEARRAY_MAXNDIMS; kk++) 
+  for(kk=0; kk<BASEARRAY_MAXNDIMS; kk++) 
     tmpi8s[kk] = dobj->step_[kk];
   os.Put(tmpi8s, BASEARRAY_MAXNDIMS);