steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Improved usa-cities

db4
Slava Pestov 2008-04-29 21:02:46 -05:00
parent 191ac9efb8
commit a452ca9105
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/usa-cities/usa-cities.factor
View File

@ -28,7 +28,7 @@ TUPLE: city
first-zip name state latitude longitude gmt-offset dst-offset ; first-zip name state latitude longitude gmt-offset dst-offset ;
MEMO: cities ( -- seq ) MEMO: cities ( -- seq )
"resource:extra/zip-codes/zipcode.csv" ascii <file-reader> "resource:extra/usa-cities/zipcode.csv" ascii <file-reader>
csv rest-slice [ csv rest-slice [
7 firstn { 7 firstn {
[ string>number ] [ string>number ]