1 files changed, 14 insertions, 0 deletions
diff --git a/src/librandom/rrandom_finish.c b/src/librandom/rrandom_finish.c
new file mode 100644
index 0000000..a3cb24b
--- /dev/null
+++ b/src/librandom/rrandom_finish.c
@@ -0,0 +1,14 @@
+/* ISC license. */
+
+#include <skalibs/unirandom.h>
+#include <skalibs/rrandom.h>
+
+int rrandom_finish (rrandom_ref z)
+{
+  rrandom zero = RRANDOM_ZERO ;
+  unsigned int i = z->n ;
+  int e = 1 ;
+  while (i--) e &= unirandom_finish(&z->tries[i].it) ;
+  if (e) *z = zero ;
+  return e ;
+}