diff --git a/core/math/order/order.factor b/core/math/order/order.factor
index a9013b5001..499cf06e9a 100644
--- 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