postgresql-test-db-name ( -- string )

Vocabulary

db.tester

Inputs

None

Outputs

string

an object

Definition

USING: accessors assocs sequences system ;

IN: db.tester

: postgresql-test-db-name ( -- string )
    os name>> cpu name>> "-" glue "-factor-test" append
    H{ { 45 95 } { 46 95 } } substitute ;