<struct> ( fields -- struct )


Vocabulary
bare

Inputs
fieldsan object


Outputs
structan object


Definition
USING: assocs bare.private kernel ;

IN: bare

: <struct> ( fields -- struct )
check-duplicate-keys check-entries dup
[ check-void 2drop ] assoc-each struct boa ;