]> www.ginac.de Git - cln.git/blobdiff - tests/timerecip2adic-compare.cc
Get rid of CL_REQUIRE/CL_PROVIDE(cl_F_ln10_var).
[cln.git] / tests / timerecip2adic-compare.cc
index 9d45328c67bba23800c4e2699761e106f08e40a4..4e8857f3b52d35e2f3584f76ad69acbcee6ddc60 100644 (file)
@@ -1,14 +1,14 @@
-#include <cl_number.h>
-#include <cl_io.h>
-#include <cl_integer.h>
+#include <cln/number.h>
+#include <cln/io.h>
+#include <cln/integer.h>
 #include "cl_DS.h"
 #include "cl_2DS.h"
-#include <cl_random.h>
+#include <cln/random.h>
 #include "cl_random_impl.h"
-#include <cl_abort.h>
-#include <stdlib.h>
-#include <string.h>
-#include <cl_timing.h>
+#include <cstdlib>
+#include <cstring>
+#include <cln/timing.h>
+using namespace cln;
 
 int main (int argc, char * argv[])
 {
@@ -31,7 +31,7 @@ int main (int argc, char * argv[])
        num_stack_alloc(len,a_MSDptr=,a_LSDptr=);
        num_stack_alloc(len,b_MSDptr=,b_LSDptr=);
        num_stack_alloc(len,bn_MSDptr=,bn_LSDptr=);
-       random_UDS(cl_default_random_state,a_MSDptr,len);
+       random_UDS(default_random_state,a_MSDptr,len);
        lspref(a_LSDptr,0) |= 1; // force a to be odd
        extern int recip2adic_threshold;
        // Check.
@@ -39,7 +39,7 @@ int main (int argc, char * argv[])
        recip2adic(len,a_LSDptr,b_LSDptr);
        recip2adic_threshold = threshold;
        recip2adic(len,a_LSDptr,bn_LSDptr);
-       if (compare_loop_msp(b_MSDptr,bn_MSDptr,len)) cl_abort();
+       if (compare_loop_msp(b_MSDptr,bn_MSDptr,len)) abort();
        // Time.
        recip2adic_threshold = 1000000;
        { CL_TIMING;