basis: removing unnecessary method stack effects.

[factor.git] / basis / io / encodings / euc / euc.factor

diff --git a/basis/io/encodings/euc/euc.factor b/basis/io/encodings/euc/euc.factor
index 8bd6c86cf56423e5b0dd2c16edc5318e11d8e4a7..1d65e146acffff9541f7b66591c8e6ae276a867d 100644 (file)
--- a/basis/io/encodings/euc/euc.factor
+++ b/basis/io/encodings/euc/euc.factor
@@ -12,7 +12,7 @@ TUPLE: euc { table biassoc read-only } ;
 : byte? ( ch -- ? )
     0x0 0xff between? ;
 
-M: euc encode-char ( char stream encoding -- )
+M: euc encode-char
     swapd table>> value-at [
         dup byte?
         [ swap stream-write1 ] [