From 3d2237c2b8ffd5d777640af310398e2a58474282 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Wed, 7 Oct 2009 15:27:40 -0500 Subject: [PATCH] inline a word in sfmt --- basis/random/sfmt/sfmt.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/basis/random/sfmt/sfmt.factor b/basis/random/sfmt/sfmt.factor index 7744f9c425..8be330ec20 100644 --- a/basis/random/sfmt/sfmt.factor +++ b/basis/random/sfmt/sfmt.factor @@ -130,7 +130,7 @@ M:: sfmt generate ( sfmt -- ) init-sfmt ; inline : refill-sfmt? ( sfmt -- ? ) - state>> [ index>> ] [ n>> 4 * ] bi >= ; + state>> [ index>> ] [ n>> 4 * ] bi >= ; inline : next-index ( sfmt -- index ) state>> [ dup 1 + ] change-index drop ; inline