Re-establish ABI, broken 2008-01-20.

* src/float/ffloat/conv/cl_FF_from_float.cc: Add obsolete signature of
cl_float_to_FF_pointer.
* src/float/dfloat/conv/cl_DF_from_double.cc: Add obsolete signature of
cl_double_to_DF_pointer.

diff --git a/ChangeLog b/ChangeLog
index 3e170fa1a38478bbfdedd11c9ec4e5f821087b98..b8a205b2d46437bd84cc4f3bcaaa2135329b725b 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+2008-04-04  Richard B. Kreckel  <kreckel@ginac.de>
+
+       Re-establish ABI, broken 2008-01-20:
+       * src/float/ffloat/conv/cl_FF_from_float.cc: Add obsolete signature of
+       cl_float_to_FF_pointer.
+       * src/float/dfloat/conv/cl_DF_from_double.cc: Add obsolete signature of
+       cl_double_to_DF_pointer.
+
 2008-03-31  Bruno Haible  <bruno@clisp.org>
 
        Fix hack from 2008-01-20 that broke on ARM.

diff --git a/TODO b/TODO
index 55f5de393cd7aaa9312a56ca39ea0db1074cb45f..7a4d982b3370c24789a8d2eac00a6a45b4a97535 100644 (file)
--- a/TODO
+++ b/TODO
@@ -1,3 +1,12 @@
+ABI Issues:
+
+Remove extra signatures in cl_FF_from_float.cc and cl_DF_from_double.cc.
+
+
+Algorithms:
+
+Niels Moeller's subquadratic GCD
+
 - polynomial division and gcd
 - polynomial documentation
 7. add combinatorial, linear algebra, factorization, polynomial functions

diff --git a/src/float/dfloat/conv/cl_DF_from_double.cc b/src/float/dfloat/conv/cl_DF_from_double.cc
index e4ada06ca9426dcc0bb5d9004eb07858a159d8a8..07537deea7288d739cae82c86e87242f18525a93 100644 (file)
--- a/src/float/dfloat/conv/cl_DF_from_double.cc
+++ b/src/float/dfloat/conv/cl_DF_from_double.cc
@@ -11,6 +11,12 @@
 
 namespace cln {
 
+cl_heap_dfloat* cl_double_to_DF_pointer (const dfloatjanus& val_)
+{
+      // XXX: This signature is for binary compatibility with CLN-1.2.0 only.
+      return cl_double_to_DF_pointer(*(double *)(&val_));
+}
+
 cl_heap_dfloat* cl_double_to_DF_pointer (const double x)
 {
       var union { dfloat eksplicit; double machine_double; } u;

diff --git a/src/float/ffloat/conv/cl_FF_from_float.cc b/src/float/ffloat/conv/cl_FF_from_float.cc
index 7181c9727164f2828236dda63ba1fece60abd634..9f4d9054f6379d25351170f58c0c4c928d29f6a4 100644 (file)
--- a/src/float/ffloat/conv/cl_FF_from_float.cc
+++ b/src/float/ffloat/conv/cl_FF_from_float.cc
@@ -10,6 +10,12 @@ namespace cln {
 
 // Implementation.
 
+cl_private_thing cl_float_to_FF_pointer (const ffloatjanus& val_)
+{
+      // XXX: This signature is for binary compatibility with CLN-1.2.0 only.
+      return cl_float_to_FF_pointer(*(float *)(&val_));
+}
+
 cl_private_thing cl_float_to_FF_pointer (const float x)
 {
       var union { ffloat eksplicit; float machine_float; } u;