basis: removing unnecessary method stack effects.

[factor.git] / basis / cpu / architecture / architecture.factor

diff --git a/basis/cpu/architecture/architecture.factor b/basis/cpu/architecture/architecture.factor
index 83de9fbf6b64f67bfc475b5dd793c4d4a9b6f531..901bc447970091d7300c7a940c38aee83f8120d1 100644 (file)
--- a/basis/cpu/architecture/architecture.factor
+++ b/basis/cpu/architecture/architecture.factor
@@ -524,7 +524,7 @@ HOOK: immediate-bitwise? cpu ( n -- ? )
 HOOK: immediate-comparand? cpu ( n -- ? )
 HOOK: immediate-store? cpu ( n -- ? )
 
-M: object immediate-comparand? ( n -- ? )
+M: object immediate-comparand?
     {
         { [ dup fixnum? ] [ tag-fixnum immediate-arithmetic? ] }
         { [ dup not ] [ drop t ] }