Changeset 306 in Sophya for trunk/SophyaLib/NTools/tvector.cc

Timestamp:

May 19, 1999, 12:17:42 PM (26 years ago)

Author:

ansari

Message:

PPersisteries.... etc.... cmv 19/5/99

File:

• trunk/SophyaLib/NTools/tvector.cc (modified) (4 diffs)

trunk/SophyaLib/NTools/tvector.cc

@@ -1 @@
-// $Id: tvector.cc,v 1.3 1999-05-18 12:58:26 ansari Exp $
+// $Id: tvector.cc,v 1.4 1999-05-19 10:17:42 ansari Exp $
 //                         C.Magneville          04/99
 #include "machdefs.h"
@@ -99 +99 @@
 }
 
+///////////////////////////////////////////////////////////
+// --------------------------------------------------------
+//   Les objets delegues pour la gestion de persistance 
+// --------------------------------------------------------
+///////////////////////////////////////////////////////////
+
+template <class T>
+FIO_TVector<T>::FIO_TVector()
+{
+dobj=new TVector<T>;
+ownobj=true;
+}
+
+template <class T>
+FIO_TVector<T>::FIO_TVector(string const & filename) 
+{
+dobj=new TVector<T>;
+ownobj=true; 
+Read(filename);
+}
+
+template <class T>
+FIO_TVector<T>::FIO_TVector(const TVector<T> & obj) 
+{ 
+dobj = new TVector<T>(obj);
+ownobj=true; 
+}
+
+template <class T>
+FIO_TVector<T>::FIO_TVector(TVector<T> * obj) 
+{ 
+dobj = obj;
+ownobj=false; 
+}
+
+template <class T>
+FIO_TVector<T>::~FIO_TVector()
+{
+if (ownobj && dobj) delete dobj;
+}
+
+template <class T>
+AnyDataObj* FIO_TVector<T>::DataObj()
+{
+return(dobj);
+}
+
+template <class T>
+void FIO_TVector<T>::ReadSelf(PInPersist& is)
+{
+// On lit les 3 premiers uint_4
+//  0: Numero de version,  1 : NRows=NElts,  2 : NCol=1
+uint_4 itab[3];
+is.Get(itab,3);
+if (dobj == NULL) dobj = new TVector<T>(itab[1]);
+else dobj->ReSize(itab[1]);
+// On lit le NDataBlock
+FIO_NDataBlock<T> fio_nd(&dobj->DataBlock());
+fio_nd.Read(is);
+}
+
+template <class T>
+void FIO_TVector<T>::WriteSelf(POutPersist& os) const
+{
+if (dobj == NULL)   return;
+//  On ecrit 3 uint_4 .... 
+//  0: Numero de version,  1 : NRows=NElts,  2 : NCol=1
+uint_4 itab[3];
+ itab[0] = 1;  // Numero de version a 1
+itab[1] = dobj->NElts();
+itab[2] = 1;
+os.Put(itab,3);
+// On ecrit le NDataBlock
+FIO_NDataBlock<T> fio_nd(&dobj->DataBlock());
+fio_nd.Write(os);
+}
+
 ///////////////////////////////////////////////////////////////
 #ifdef __CXX_PRAGMA_TEMPLATES__
@@ -112 +189 @@
 #pragma define_template TVector< complex<float> > 
 #pragma define_template TVector< complex<double> > 
+// Instances des delegues FileIO (PPersist)
+#pragma define_template FIO_TVector<uint_1>
+#pragma define_template FIO_TVector<uint_2>
+#pragma define_template FIO_TVector<int_2>
+#pragma define_template FIO_TVector<int_4>
+#pragma define_template FIO_TVector<int_8>
+#pragma define_template FIO_TVector<uint_4>
+#pragma define_template FIO_TVector<uint_8>
+#pragma define_template FIO_TVector<r_8>
+#pragma define_template FIO_TVector<r_4>
+#pragma define_template FIO_TVector< complex<float> >
+#pragma define_template FIO_TVector< complex<double> >
 #endif
 
@@ -126 +215 @@
 template class TVector< complex<float> >;
 template class TVector< complex<double> >;
+// Instances des delegues FileIO (PPersist)
+template class FIO_TVector<uint_1>;
+template class FIO_TVector<uint_2>;
+template class FIO_TVector<int_2>;
+template class FIO_TVector<int_4>;
+template class FIO_TVector<int_8>;
+template class FIO_TVector<uint_4>;
+template class FIO_TVector<uint_8>;
+template class FIO_TVector<r_8>;
+template class FIO_TVector<r_4>;
+template class FIO_TVector< complex<float> >;
+template class FIO_TVector< complex<double> >;
 #endif