1 USING: accessors combinators.short-circuit effects kernel math
2 sequences stack-checker ;
3 IN: combinators.short-circuit.smart
7 ERROR: cannot-determine-arity ;
11 dup terminated?>> [ cannot-determine-arity ] when
12 effect-height neg 1 + ;
16 MACRO: && ( quots -- quot ) dup arity '[ _ _ n&& ] ;
18 MACRO: || ( quots -- quot ) dup arity '[ _ _ n|| ] ;