From 5b6e714d05a0c96ade618256a67a9cb7f337f196 Mon Sep 17 00:00:00 2001 From: Roy Frostig Date: Sun, 25 Jul 2010 21:45:09 -0700 Subject: Expose an RNG (the one used by our runtime) to Rust via std. --- src/lib/rand.rs | 25 +++++++++++++++++++++++++ 1 file changed, 25 insertions(+) create mode 100644 src/lib/rand.rs (limited to 'src/lib/rand.rs') diff --git a/src/lib/rand.rs b/src/lib/rand.rs new file mode 100644 index 00000000..96dcbaf7 --- /dev/null +++ b/src/lib/rand.rs @@ -0,0 +1,25 @@ +/** + * Bindings the runtime's random number generator (ISAAC). + */ + +native "rust" mod rustrt { + type rctx; + fn rand_new() -> rctx; + fn rand_next(rctx c) -> u32; + fn rand_free(rctx c); +} + +type rng = obj { fn next() -> u32; }; + +fn mk_rng() -> rng { + obj rt_rng(rustrt.rctx c) { + fn next() -> u32 { + ret rustrt.rand_next(c); + } + drop { + rustrt.rand_free(c); + } + } + + ret rt_rng(rustrt.rand_new()); +} -- cgit v1.2.3