update-locs ( loc document -- )


Vocabulary
documents

Inputs
locan object
documentan object


Outputs
None

Definition
USING: accessors kernel models sequences ;

IN: documents

: update-locs ( loc document -- )
locs>> [ set-model ] with each ;