basis: removing unnecessary method stack effects.

[factor.git] / basis / math / ranges / ranges.factor

diff --git a/basis/math/ranges/ranges.factor b/basis/math/ranges/ranges.factor
index 5511756092e0afc07efd1ab917da714285e359c0..18a6c49aba1eb3413e61909501d2a3a3f85a2d72 100644 (file)
--- a/basis/math/ranges/ranges.factor
+++ b/basis/math/ranges/ranges.factor
@@ -21,9 +21,9 @@ PRIVATE>
     [ sign/mod 0 < [ 1 + ] unless 0 max ] keep
     range boa ; inline
 
-M: range length ( seq -- n ) length>> ; inline
+M: range length length>> ; inline
 
-M: range nth-unsafe ( n range -- obj )
+M: range nth-unsafe
     [ step>> * ] keep from>> + ; inline
 
 ! We want M\ tuple hashcode, not M\ sequence hashcode here!