Artifact ff0bb26c19833c121564b748bb6449b479b14630:
- File testzmq/random.scm — part of check-in [ff1b962889] at 2013-01-08 11:07:43 on branch remote-run-capability — Added/modified stuff for mockup (user: mrwellan, size: 187) [annotate] [blame] [check-ins using] [more...]
(use posix) (randomize (inexact->exact (current-seconds))) (define low (string->number (cadr (argv)))) (define hi (string->number (caddr (argv)))) (print (+ low (random (- hi low))))