add-to-index ( words index file -- )

Vocabulary

rosetta-code.inverted-index

Inputs

words	an object
index	an object
file	an object

Outputs

None

Definition

USING: assocs kernel sequences ;

IN: rosetta-code.inverted-index

: add-to-index ( words index file -- )
    [ add-to-file-list ] curry [ change-at ] 2curry each ;