diff --git a/core/math/order/order.factor b/core/math/order/order.factor index 36624f5ca9..b1820daa8d 100644 --- a/core/math/order/order.factor +++ b/core/math/order/order.factor @@ -40,4 +40,4 @@ M: real after=? ( obj1 obj2 -- ? ) >= ; : [-] ( x y -- z ) - 0 max ; inline -: compare ( obj1 obj2 quot -- n ) bi@ <=> ; inline +: compare ( obj1 obj2 quot -- symbol ) bi@ <=> ; inline