-#include <cl_number.h>
-#include <cl_io.h>
-#include <cl_float.h>
-#include <cl_real.h>
-#include <cl_random.h>
-#include <stdlib.h>
-#include <string.h>
-#include <cl_timing.h>
-#include "cl_LF.h"
+#include <cln/number.h>
+#include <cln/io.h>
+#include <cln/float.h>
+#include <cln/real.h>
+#include <cln/random.h>
+#include <cstdlib>
+#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[])
{
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