math.order: Removing stack effect (not quite right).

db4
John Benediktsson 2011-09-22 17:30:56 -07:00
parent 3c1356bf69
commit f6ee4c5a55
1 changed files with 1 additions and 1 deletions

View File

@ -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