read-poly ( -- box parts points ) (original) (raw)

read-poly ( -- box parts points )

Vocabulary
shapefiles.private

Inputs
None

Outputs

box	an object
parts	an object
points	an object

Definition

USING: kernel ;

IN: shapefiles.private

: read-poly ( -- box parts points )
read-box read-int read-int [ read-ints ] dip read-points ;