normal-suffixes ( zs -- ss )

Vocabulary

boyer-moore.private

Inputs

zs

an object

Outputs

ss

an object

Definition

USING: arrays kernel ranges sequences ;

IN: boyer-moore.private

: normal-suffixes ( zs -- ss )
    [ length [ f <array> ] [ [1..b) ] bi ] keep pick
    [ (normal-suffixes) ] 2curry each ; inline