USA cities database added

diff --git a/extra/symbols/symbols.factor b/extra/symbols/symbols.factor
index f6254f19de79d5ce0375996c3210ffb527c64625..50733a620e031d0525c604ac5da1af7520cbdb75 100755 (executable)
--- a/extra/symbols/symbols.factor
+++ b/extra/symbols/symbols.factor
@@ -1,9 +1,14 @@
 ! Copyright (C) 2008 Doug Coleman.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: parser sequences words kernel ;
+USING: parser sequences words kernel classes.singleton ;
 IN: symbols
 
 : SYMBOLS:
     ";" parse-tokens
     [ create-in dup reset-generic define-symbol ] each ;
     parsing
+
+: SINGLETONS:
+    ";" parse-tokens
+    [ create-class-in dup save-location define-singleton-class ] each ;
+    parsing

diff --git a/extra/usa-cities/usa-cities.factor b/extra/usa-cities/usa-cities.factor
index c74673607b3daeadf2433d9b5f7e3568d4e234b8..b82d0580095dba42b4f929d27a8870aa3d189fa7 100644 (file)
--- a/extra/usa-cities/usa-cities.factor
+++ b/extra/usa-cities/usa-cities.factor
@@ -1,7 +1,9 @@
+! Copyright (C) 2008 Slava Pestov.
+! See http://factorcode.org/license.txt for BSD license.
 USING: io.files io.encodings.ascii sequences sequences.lib
 math.parser combinators kernel memoize csv symbols inspector
 words accessors math.order sorting ;
-IN: zip-codes
+IN: usa-cities
 
 SINGLETONS: AK AL AR AS AZ CA CO CT DC DE FL GA HI IA ID IL IN
 KS KY LA MA MD ME MI MN MO MS MT NC ND NE NH NJ NM NV NY OH OK