combinators.smart: Clarify stack effect for cleave>array.

db4
Doug Coleman 2013-05-13 18:10:19 -07:00
parent 5ee7f10f19
commit e996dc7f8e
1 changed files with 1 additions and 1 deletions

View File

@ -67,7 +67,7 @@ M: object infer-known* drop f ;
: output>array ( quot -- array )
{ } output>sequence ; inline
: cleave>array ( x seq -- array )
: cleave>array ( obj quots -- array )
'[ _ cleave ] output>array ; inline
: cleave>sequence ( x seq exemplar -- array )