Use built-in symbol generator

Adapting the keyword generator results in unreadable symbols when they start with e.g. `+4`
plumatic · Mar 13, 2018 · 27e2cfa · 27e2cfa
1 parent 14a1455
commit 27e2cfa
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 1 deletion.
diff --git a/src/schema_generators/generators.cljc b/src/schema_generators/generators.cljc
@@ -128,7 +128,7 @@
     s/Keyword generators/keyword
     #?(:clj clojure.lang.Keyword
        :cljs cljs.core/Keyword) generators/keyword
-    s/Symbol (generators/fmap (comp symbol name) generators/keyword)
+    s/Symbol generators/symbol
     #?(:clj Object :cljs js/Object) generators/any
     s/Any generators/any
     s/Uuid generators/uuid

diff --git a/test/schema_generators/generators_test.cljc b/test/schema_generators/generators_test.cljc
@@ -64,3 +64,7 @@
   50
   (properties/for-all [x (generators/generator OGSchema)]
                       (not (s/check OGSchema x))))
+
+(defspec readable-symbols-spec 1000
+  (properties/for-all [x (generators/generator s/Symbol)]
+    (-> x str read-string (= x))))