b40f2958d4
Before it was not possible to add values to anything except leafs of the namespace structure.
24 lines
609 B
JavaScript
24 lines
609 B
JavaScript
Elm.Native.Random = {};
|
|
Elm.Native.Random.make = function(elm) {
|
|
|
|
elm.Native = elm.Native || {};
|
|
elm.Native.Random = elm.Native.Random || {};
|
|
if (elm.Native.Random.values) return elm.Native.Random.values;
|
|
|
|
var Signal = Elm.Signal.make(elm);
|
|
|
|
function range(min, max, signal) {
|
|
function f(x) { return Math.floor(Math.random() * (max-min+1)) + min; }
|
|
return A2( Signal.lift, f, signal );
|
|
}
|
|
|
|
function flt(signal) {
|
|
function f(x) { return Math.random(); }
|
|
return A2( Signal.lift, f, signal );
|
|
}
|
|
|
|
return elm.Native.Random.values = {
|
|
range: F3(range),
|
|
flt: flt
|
|
};
|
|
};
|