shapefiles: fix stacke effect names in read-shp.

diff --git a/extra/shapefiles/shapefiles.factor b/extra/shapefiles/shapefiles.factor
index 49a85d143886bd67cf13c0233b01e13680736830..fe33b05b7dfe5d0b47e7aa6986cbf53f294b4d77 100644 (file)
--- a/extra/shapefiles/shapefiles.factor
+++ b/extra/shapefiles/shapefiles.factor
@@ -167,10 +167,10 @@ TUPLE: record number content-length shape ;
 : read-records ( -- records )
     [ read-record dup ] [ ] produce nip ;
 
-: read-shp ( -- header shapes )
+: read-shp ( -- header records )
     read-header read-records ;
 
-: file>shp ( path -- header shapes )
+: file>shp ( path -- header records )
     binary [ read-shp ] with-file-reader ;
 
 TUPLE: index offset content-length ;