From f6ee4c5a559166323947e940b47bdf1fc67204eb Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Thu, 22 Sep 2011 17:30:56 -0700 Subject: [PATCH] math.order: Removing stack effect (not quite right). --- core/math/order/order.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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