Changeset 290 in Sophya for trunk/SophyaLib/BaseTools

Timestamp:

May 5, 1999, 7:49:24 AM (26 years ago)

Author:

ansari

Message:

Perfectionnement FIO_NDataBlock Reza 5/5/99

File:

• trunk/SophyaLib/BaseTools/ndatablock.cc (modified) (1 diff)

trunk/SophyaLib/BaseTools/ndatablock.cc

@@ -608 +608 @@
 is.Get(itab, 3);
 if (dobj == NULL) dobj = new NDataBlock<T>(itab[1]);
-else dobj->ReSize(itab[1]);
+else if (itab[1] != dobj->Size()) dobj->ReSize(itab[1]);
 // On lit le tableau de nombres
 PIOSReadArray(is, dobj->Data(), dobj->Size());