comparison src/c/urweb.c @ 1254:935a981f4380

Merge
author Adam Chlipala <adamc@hcoop.net>
date Thu, 06 May 2010 13:57:01 -0400
parents e80582b927f2
children 83b1853d1e58
comparison
equal deleted inserted replaced
1198:b52929351402 1254:935a981f4380
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 }