math.order: Removing stack effect (not quite right).

diff --git a/core/math/order/order.factor b/core/math/order/order.factor
index a9013b500170264081f3861012d61ef3cd4e4111..499cf06e9a6394d04d514331a88dc7f2c2949580 100644 (file)
--- a/core/math/order/order.factor
+++ b/core/math/order/order.factor
@@ -45,4 +45,4 @@ M: object max [ after? ] most ; inline
 
 : [-] ( x y -- z ) - 0 max ; inline
 
-: compare ( obj1 obj2 quot: ( obj -- newobj ) -- <=> ) bi@ <=> ; inline
+: compare ( obj1 obj2 quot -- <=> ) bi@ <=> ; inline