-#include <cl_number.h>
-#include <cl_io.h>
-#include <cl_integer.h>
-#include "cl_DS.h"
-#include "cl_2DS.h"
-#include <cl_random.h>
-#include "cl_random_impl.h"
-#include <cl_abort.h>
-#include <stdlib.h>
-#include <string.h>
-#include <cl_timing.h>
+#include <cln/number.h>
+#include <cln/io.h>
+#include <cln/integer.h>
+#include "base/digitseq/cl_DS.h"
+#include "base/digitseq/cl_2DS.h"
+#include <cln/random.h>
+#include "base/random/cl_random_impl.h"
+#include <cstdlib>
+#include <cstring>
+#include <cln/timing.h>
+using namespace cln;
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.
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;