Mercurial > urweb

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

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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
comparison
equal deleted inserted replaced
1249:7c6fc92f6c31 1250:e80582b927f2
3402 uw_Basis_unit uw_Basis_debug(uw_context ctx, uw_Basis_string s) { 3402 uw_Basis_unit uw_Basis_debug(uw_context ctx, uw_Basis_string s) {
3403 fprintf(stderr, "%s\n", s); 3403 fprintf(stderr, "%s\n", s);
3404 3404
3405 return uw_unit_v; 3405 return uw_unit_v;
3406 } 3406 }
3407
3408 uw_Basis_int uw_Basis_rand(uw_context ctx) {
3409 uw_Basis_int n = abs(rand());
3410 return n;
3411 }