]> www.ginac.de Git - cln.git/blobdiff - src/integer/random/cl_I_trandom.cc
Avoid shifting a 32-bit zero value by more than 31 bits.
[cln.git] / src / integer / random / cl_I_trandom.cc
index bd27ab10c88cc50d40c4e0472c74a67254bbc6f0..5e002423c8889857e7ed3705f10cf44b677ba7fa 100644 (file)
@@ -4,7 +4,7 @@
 #include "cl_sysdep.h"
 
 // Specification.
-#include "cl_integer.h"
+#include "cln/integer.h"
 
 
 // Implementation.
@@ -13,7 +13,9 @@
 #include "cl_I.h"
 #include "cl_DS.h"
 
-const cl_I testrandom_I (cl_random_state& randomstate)
+namespace cln {
+
+const cl_I testrandom_I (random_state& randomstate)
 {
   var uint32 ran = random32(randomstate);
   var cl_boolean negative = (cl_boolean)(ran & 1);
@@ -39,3 +41,5 @@ const cl_I testrandom_I (cl_random_state& randomstate)
   var cl_I x = UDS_to_I(MSDptr,len);
   return (negative ? -x : x);
 }
+
+}  // namespace cln