basis: removing unnecessary method stack effects.

[factor.git] / basis / unix / linux / proc / proc.factor

diff --git a/basis/unix/linux/proc/proc.factor b/basis/unix/linux/proc/proc.factor
index bf4b7f76b12f3c2c64efdf02dc62486bdd99bb39..c2de4270f887a3e8a421f9fb9472a24a1f31fa07 100644 (file)
--- a/basis/unix/linux/proc/proc.factor
+++ b/basis/unix/linux/proc/proc.factor
@@ -282,12 +282,12 @@ TUPLE: proc-uptime up idle ;
 
 GENERIC#: proc-pid-path 1 ( object string -- path )
 
-M: integer proc-pid-path ( pid string -- path )
+M: integer proc-pid-path
     [ "/proc/" ] 2dip
     [ number>string "/" append ] dip
     3append ;
 
-M: string proc-pid-path ( pid-string string -- path )
+M: string proc-pid-path
     [ "/proc/" ] 2dip [ append-path ] dip append-path ;
 
 : proc-file-lines ( path -- strings ) utf8 file-lines ;