check-shape-types ( shapes -- )

Vocabulary

shapefiles.private

Inputs

shapes

an object

Outputs

None

Definition

USING: kernel math sequences ;

IN: shapefiles.private

: check-shape-types ( shapes -- )
    non-null-shape-types dup length 1 >
    [ non-null-shapes-must-be-same-type ] [ drop ] if ;