HT @belisarius222

This commit is contained in:
Anton Dyudin 2017-12-11 15:54:42 -08:00 committed by GitHub
parent 496a9c87aa
commit b3d5acb48b
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -1066,7 +1066,12 @@
|= {fit/? for/mark}
|= {cof/cafe sam/vase}
^- (bolt vase)
::
:: don't verify the product type when using the %noun mark, since
:: that would cast to *, which would prevent the product from
:: being used as a gate or other typed structure.
?: =(for %noun) (fine cof sam)
::
%+ cool |.(leaf+"ford: check {<[for bek `@p`(mug q.sam)]>}")
%+ cope (fang cof for)
|= {cof/cafe tux/vase}