math.order: Removing stack effect (not quite right).
parent
3c1356bf69
commit
f6ee4c5a55
|
@ -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
|
||||
|
|
Loading…
Reference in New Issue