Remove redundant word

db4
Slava Pestov 2008-04-07 21:05:00 -05:00
parent a48120c80b
commit b6befe6100
1 changed files with 0 additions and 3 deletions

View File

@ -37,9 +37,6 @@ IN: assocs.lib
: insert ( value variable -- ) namespace insert-at ;
: 2seq>assoc ( keys values exemplar -- assoc )
>r 2array flip r> assoc-like ;
: generate-key ( assoc -- str )
>r 256 random-bits >hex r>
2dup key? [ nip generate-key ] [ drop ] if ;