insert-site ( url -- site )

Vocabulary

site-watcher.db

Inputs

url

an object

Outputs

site

an object

Definition

USING: accessors db.tuples kernel ;

IN: site-watcher.db

: insert-site ( url -- site )
    <site> [ select-tuple ] [ dup t >>up? insert-tuple ] ?unless
    ;