]> gitweb.factorcode.org Git - factor.git/blobdiff - core/assocs/assocs.factor
Resolved merge.
[factor.git] / core / assocs / assocs.factor
index e783ef81c4d7d7328157b45ee762ffc9a24391be..d655b99c3045ca16bbea780c8050e4583bf0c14a 100755 (executable)
@@ -82,9 +82,6 @@ PRIVATE>
 : at ( key assoc -- value/f )
     at* drop ; inline
 
-: at-default ( key assoc -- value/key )
-    ?at drop ; inline
-
 M: assoc assoc-clone-like ( assoc exemplar -- newassoc )
     [ dup assoc-size ] dip new-assoc
     [ [ set-at ] with-assoc assoc-each ] keep ;