Artifact 7090f9f44fc64eb2d1a8102072e5ee9b4aff7a62:
- File testzmq/random.scm — part of check-in [639b5034cc] at 2013-01-08 20:43:27 on branch remote-run-capability — Added numbers egg as needed to mockup (user: matt, size: 195) [annotate] [blame] [check-ins using] [more...]
(use posix numbers) (randomize (inexact->exact (current-seconds))) (define low (string->number (cadr (argv)))) (define hi (string->number (caddr (argv)))) (print (+ low (random (- hi low))))