diff src/c/urweb.c @ 1250:e80582b927f2

Add rand to Basis and handle it in Iflow
author Adam Chlipala <adamc@hcoop.net>
date Thu, 29 Apr 2010 17:24:42 -0400
parents 8679ba87cf3c
children 83b1853d1e58
line wrap: on
line diff
--- a/src/c/urweb.c	Thu Apr 29 11:47:24 2010 -0400
+++ b/src/c/urweb.c	Thu Apr 29 17:24:42 2010 -0400
@@ -3404,3 +3404,8 @@
 
   return uw_unit_v;
 }
+
+uw_Basis_int uw_Basis_rand(uw_context ctx) {
+  uw_Basis_int n = abs(rand());
+  return n;
+}