Remove exception hooks in favor of real C++ exceptions:

[cln.git] / src / real / transcendental / cl_R_coshsinh.cc

diff --git a/src/real/transcendental/cl_R_coshsinh.cc b/src/real/transcendental/cl_R_coshsinh.cc
index fc341def9772f9e3ee1426112006ecc00be427b6..12fbb18a2cee4f5a15a0218f1e3349961fdede92 100644 (file)
--- a/src/real/transcendental/cl_R_coshsinh.cc
+++ b/src/real/transcendental/cl_R_coshsinh.cc
@@ -1,18 +1,20 @@
-// cl_cosh_sinh().
+// cosh_sinh().
 
 // General includes.
 #include "cl_sysdep.h"
 
 // Specification.
-#include "cl_real.h"
+#include "cln/real.h"
 
 
 // Implementation.
 
-#include "cl_float.h"
+#include "cln/float.h"
 #include "cl_R.h"
 
-const cl_cosh_sinh_t cl_cosh_sinh (const cl_R& x)
+namespace cln {
+
+const cosh_sinh_t cosh_sinh (const cl_R& x)
 {
 // Methode:
 // x rational -> bei x=0 (1,0) als Ergebnis, sonst x in Float umwandeln.
@@ -21,10 +23,12 @@ const cl_cosh_sinh_t cl_cosh_sinh (const cl_R& x)
        if (rationalp(x)) {
                DeclareType(cl_RA,x);
                if (zerop(x)) // x=0 -> (1,0) als Ergebnis
-                       return cl_cosh_sinh_t(1,0);
-               return cl_cosh_sinh(cl_float(x)); // sonst in Float umwandeln
+                       return cosh_sinh_t(1,0);
+               return cosh_sinh(cl_float(x)); // sonst in Float umwandeln
        } else {
                DeclareType(cl_F,x);
-               return cl_cosh_sinh(x);
+               return cosh_sinh(x);
        }
 }
+
+}  // namespace cln