count-inputs ( quot -- n ) - Factor Documentation

count-inputs ( quot -- n )

Vocabulary
fry .private

Inputs

quot an object

Outputs

n an object

Definition

IN: fry.private

GENERIC: count-inputs ( quot -- n )

Methods

USING: fry.private kernel ;

M: fry-specifier count-inputs drop 1 ;

USING: accessors fry.private locals.types ;

M: lambda count-inputs body>> count-inputs ;

USING: accessors fry.private locals.types ;

M: let count-inputs body>> count-inputs ;

USING: fry.private kernel ;

M: object count-inputs drop 0 ;

USING: fry.private sequences ;

M: sequence count-inputs [ count-inputs ] map-sum ;