diff --git a/random.dylan b/random.dylan index dfa5fa9..43b18da 100644 --- a/random.dylan +++ b/random.dylan @@ -9,7 +9,7 @@ define constant $IA = 3877; define constant $IC = 29573; define variable $LAST :: = 42; -define method generate-random (max :: ) => (m :: ); +define inline method generate-random (max :: ) => (m :: ); $LAST := modulo($LAST * $IA + $IC, $IM); max * $LAST / $IM; end method;