add-loc ( loc document -- )


Vocabulary
documents

Inputs
locan object
documentan object


Outputs
None

Definition
USING: accessors sequences ;

IN: documents

: add-loc ( loc document -- ) locs>> push ;