sets: implement M\ f delete.

2013-03-08 22:26:56 -08:00 · 2013-03-08 22:26:56 -08:00 · fea449d7ea
parent e343fc7b01
commit fea449d7ea
1 changed files with 2 additions and 0 deletions
--- a/core/sets/sets.factor
+++ b/core/sets/sets.factor
@ -26,6 +26,8 @@ GENERIC: clear-set ( set -- )

 M: f cardinality drop 0 ;

+M: f delete 2drop ;
+
 M: f clear-set drop ; inline

 ! Defaults for some methods.