Making tuples work with a database:

define-persistent ( class table columns -- )

Creating tables:

create-table ( class -- )

ensure-table ( class -- )

ensure-tables ( classes -- )

recreate-table ( class -- )

Dropping tables:

drop-table ( class -- )

Inserting a tuple:

insert-tuple ( tuple -- )

Updating tuples:

update-tuple ( tuple -- )

update-tuples ( query/tuple quot: ( tuple -- tuple'/f ) -- )

Deleting tuples:

delete-tuples ( tuple -- )

reject-tuples ( query/tuple quot: ( tuple -- ? ) -- )

Querying tuples:

each-tuple ( query/tuple quot: ( tuple -- ) -- )

select-tuple ( query/tuple -- tuple/f )

select-tuples ( query/tuple -- tuples )

count-tuples ( query/tuple -- n )