default-person lookup-persistent . T{ persistent { class default-person } { name "default_person" } { columns { T{ db-column { accessor id>> } { name "id" } { type INTEGER } { modifiers { SERIAL PRIMARY-KEY } } } T{ db-column { accessor name>> } { name "name" } { type VARCHAR } } T{ db-column { accessor birthdate>> } { name "birthdate" } { type TIMESTAMP } } T{ db-column { accessor email>> } { name "email" } { type VARCHAR } } T{ db-column { accessor homepage>> } { name "homepage" } { type URL } } } } { column-name-string "name, birthdate, email, homepage" } { accessor-quot [ [ name>> birthdate>> email>> homepage>> ] output>sequence ] } { db-assigned-id? t } }