X-Git-Url: https://ginac.de/CLN/cln.git//cln.git?a=blobdiff_plain;f=tests%2Ftimeeuler.cc;h=f0730e6ee93c049d210a7066033aecf122a34f77;hb=97da144ed68ca771ce367e7e0d5604a2042c1122;hp=40f44eace139ddc8f9610b9cb8247a4f4f6464c9;hpb=0e9c0591fb76b6cac33bc567fca31e6695453a07;p=cln.git

diff --git a/tests/timeeuler.cc b/tests/timeeuler.cc
index 40f44ea..f0730e6 100644
--- a/tests/timeeuler.cc
+++ b/tests/timeeuler.cc
@@ -7,6 +7,19 @@
 #include <cstring>
 #include <cln/timing.h>
 #include "float/lfloat/cl_LF.h"
+namespace cln
+{
+// FIXME: don't use internal functions.
+extern cl_LF compute_eulerconst (uintC len);
+extern cl_LF compute_eulerconst_expintegral (uintC len);
+extern cl_LF compute_eulerconst_expintegral1 (uintC len);
+extern cl_LF compute_eulerconst_expintegral2 (uintC len);
+extern cl_LF compute_eulerconst_besselintegral1 (uintC len);
+extern cl_LF compute_eulerconst_besselintegral2 (uintC len);
+extern cl_LF compute_eulerconst_besselintegral3 (uintC len);
+extern cl_LF compute_eulerconst_besselintegral4 (uintC len);
+}
+
 using namespace cln;
 
 int main (int argc, char * argv[])
@@ -19,14 +32,8 @@ int main (int argc, char * argv[])
 	if (argc < 2)
 		exit(1);
 	uintL len = atoi(argv[1]);
-	extern cl_LF compute_eulerconst (uintC len);
-	extern cl_LF compute_eulerconst_expintegral (uintC len);
-	extern cl_LF compute_eulerconst_expintegral1 (uintC len);
-	extern cl_LF compute_eulerconst_expintegral2 (uintC len);
-	extern cl_LF compute_eulerconst_besselintegral1 (uintC len);
-	extern cl_LF compute_eulerconst_besselintegral2 (uintC len);
-	extern cl_LF compute_eulerconst_besselintegral3 (uintC len);
-	extern cl_LF compute_eulerconst_besselintegral4 (uintC len);
+
+
 	cl_LF p;
 	ln(cl_I_to_LF(1000,len+10)); // fill cache
 #if 0