remove-types ( table -- table' )

Vocabulary

persistency

Inputs

table

an object

Outputs

table'

an object

Definition

USING: arrays kernel sequences ;

IN: persistency

: remove-types ( table -- table' )
    [ dup array? [ first ] when ] map ;