basis: removing unnecessary method stack effects.

[factor.git] / basis / random / sfmt / sfmt.factor

diff --git a/basis/random/sfmt/sfmt.factor b/basis/random/sfmt/sfmt.factor
index f4a50cde72d13d28b11423d42c16173ba6431d51..46e1e3384b5a315c16ce99729bcac5edaeaff983 100644 (file)
--- a/basis/random/sfmt/sfmt.factor
+++ b/basis/random/sfmt/sfmt.factor
@@ -150,10 +150,10 @@ M:: sfmt generate ( sfmt -- )
 
 PRIVATE>
 
-M: sfmt random-32* ( sfmt -- n )
+M: sfmt random-32*
     dup refill-sfmt? [ dup generate ] when next ; inline
 
-M: sfmt seed-random ( sfmt seed -- sfmt )
+M: sfmt seed-random
     [ [ state>> ] dip >>seed drop ]
     [ drop init-sfmt ] 2bi ;