Changeset 3750 in Sophya for trunk/SophyaLib/BaseTools/datatype.cc

Timestamp:

Mar 3, 2010, 9:44:38 PM (16 years ago)

Author:

ansari

Message:

Prise en charge de float 128 bits (r_16, complex<r_16>) par les NDataBlock<T> et PPersist, controlee par le flag de compilation SO_LDBLE128 defini ds machdefs.h , Reza 03/03/2010

File:

• trunk/SophyaLib/BaseTools/datatype.cc (modified) (6 diffs)

trunk/SophyaLib/BaseTools/datatype.cc

@@ -31 +31 @@
   else if (typeid(T) == typeid(complex<r_4>)) return(" complex<r_4> ");
   else if (typeid(T) == typeid(complex<r_8>)) return(" complex<r_8> ");
+#ifdef SO_LDBLE128
+  else if (typeid(T) == typeid(r_16)) return("r_16");
+  else if (typeid(T) == typeid(complex<r_16>)) return(" complex<r_16> ");
+#endif
   else return("???unknowntype???");
 }
@@ -48 +52 @@
   else if (typeid(T) == typeid(complex<r_4>)) return(11);
   else if (typeid(T) == typeid(complex<r_8>)) return(12);
+#ifdef SO_LDBLE128
+  else if (typeid(T) == typeid(r_16)) return(13);
+  else if (typeid(T) == typeid(complex<r_16>)) return(14);
+#endif
   else return(0);
 }
@@ -78 +86 @@
 DECL_TEMP_SPEC
 string DataTypeInfo< complex<r_8> >::getTypeName() { return(" complex<r_8> "); }
-
+#ifdef SO_LDBLE128
+DECL_TEMP_SPEC
+string DataTypeInfo<r_16>::getTypeName() { return("r_16"); }
+DECL_TEMP_SPEC
+string DataTypeInfo< complex<r_16> >::getTypeName() { return(" complex<r_16> "); }
+#endif
 /*! 
   \ brief Return an identifier associated to T 
@@ -114 +127 @@
 DECL_TEMP_SPEC
 int DataTypeInfo< complex<r_8> >::getTypeId() { return(12); }
+#ifdef SO_LDBLE128
+DECL_TEMP_SPEC
+int DataTypeInfo<r_16>::getTypeId() { return(13); }
+DECL_TEMP_SPEC
+int DataTypeInfo< complex<r_16> >::getTypeId() { return(14); }
+#endif
+
 #endif
 
@@ -185 +205 @@
 #pragma define_template DataTypeInfo< complex<r_4> >
 #pragma define_template DataTypeInfo< complex<r_8> >
+#ifdef SO_LDBLE128
+#pragma define_template DataTypeInfo<r_16>
+#pragma define_template DataTypeInfo< complex<r_16> >
+#endif
+
 #endif
 
@@ -200 +225 @@
 template class DataTypeInfo< complex<r_4> >;
 template class DataTypeInfo< complex<r_8> >;
+#ifdef SO_LDBLE128
+template class DataTypeInfo<r_16>;
+template class DataTypeInfo< complex<r_16> >;
+#endif
+
 #endif