Fix classes.tuple tests and assocs help lint

db4
Slava Pestov 2010-02-04 08:04:47 +13:00
parent 3d8f77ca56
commit 10fe9a811b
2 changed files with 4 additions and 2 deletions

View File

@ -242,6 +242,8 @@ M: code-blocks nth-unsafe
[ cache>> ] [ blocks>> ] bi
'[ _ nth-unsafe <code-block> ] cache ; inline
M: code-blocks hashcode* 2drop 0 ;
INSTANCE: code-blocks immutable-sequence
: code-blocks ( -- blocks )

View File

@ -361,9 +361,9 @@ HELP: assoc-diff
;
HELP: assoc-diff!
{ $values { "assoc1" assoc } { "assoc2" assoc } { "diff" "a new assoc" } }
{ $values { "assoc1" assoc } { "assoc2" assoc } }
{ $description "Removes all entries from " { $snippet "assoc1" } " whose key is contained in " { $snippet "assoc2" } "." }
{ $side-effects assoc-diff! } ;
{ $side-effects "assoc1" } ;
HELP: substitute
{ $values { "seq" sequence } { "assoc" assoc } { "newseq" sequence } }