check-hashtable ( seq -- seq )

Vocabulary

hashtables

Inputs

seq

an object

Outputs

seq

an object

Definition

USING: kernel sequences ;

IN: hashtables

: check-hashtable ( seq -- seq )
    dup
    [ dup length 2 = [ drop ] [ malformed-hashtable-pair ] if ]
    each ;