Eliminate duplicate syntax for stack effects "(" no longer drops and is identical...

[factor.git] / core / classes / classes.factor

diff --git a/core/classes/classes.factor b/core/classes/classes.factor
index 623368d6fbe8e987484e800ebef6044770770e40..4bbf6bc9cb63985a04028069e28d14964d01f23b 100644 (file)
--- a/core/classes/classes.factor
+++ b/core/classes/classes.factor
@@ -78,7 +78,7 @@ M: predicate reset-word
     [ call-next-method ] [ f "predicating" set-word-prop ] bi ;
 
 : define-predicate ( class quot -- )
-    [ predicate-word ] dip (( object -- ? )) define-declared ;
+    [ predicate-word ] dip ( object -- ? ) define-declared ;
 
 : superclass ( class -- super )
     #! Output f for non-classes to work with algebra code