math.order: Removing stack effect (not quite right).
parent
ac8b589f9a
commit
cce00c2651
|
|
@ -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