<sql-spec> ( class slot-name column-name type modifiers -- sql-spec )

Vocabulary

db.types

Inputs

class	an object
slot-name	an object
column-name	an object
type	an object
modifiers	an object

Outputs

sql-spec

an object

Definition

USING: accessors kernel ;

IN: db.types

: <sql-spec>
    ( class slot-name column-name type modifiers -- sql-spec )
    sql-spec new swap >>modifiers swap >>type swap >>column-name
    swap >>slot-name swap >>class dup normalize-spec ;