Increase default fuzz count with optional arg when running lein run.

Author: Grinkers

fuzzer/project.clj

@@ -3,8 +3,8 @@
   :url "http://example.com/FIXME"
   :license {:name "EPL-2.0 OR GPL-2.0-or-later WITH Classpath-exception-2.0"
             :url "https://www.eclipse.org/legal/epl-2.0/"}
-  :dependencies [[org.clojure/clojure "1.11.1"]
-                 [org.clojure/data.generators "1.0.0"]]
+  :dependencies [[org.clojure/clojure "1.12.1"]
+                 [org.clojure/data.generators "1.1.0"]]
   :main ^:skip-aot fuzzer.core
   :target-path "target/%s"
   :jvm-opts ["-Djava.library.path=./resources"]

fuzzer/src/fuzzer/core.clj

@@ -10,9 +10,9 @@
 (defn -main
   [& args]
   (init!)
-  (dotimes [_ 9042]
+  (dotimes [_ (if (first args) (Integer/parseInt (first args)) 109042)]
     (let [source (pr-str (cgen/ednable))
-          ; clojure-reader dedn-oesn't preserve order on hashmaps or sets. For now we just use clojure's
+          ; clojure-reader doesn't preserve order on hashmaps or sets. For now we just use clojure's
           ; read-string to make sure the round trip is valid edn.
           clojure-reader (-> (Rust/roundtrip source) cljedn/read-string)
           edn (cljedn/read-string source)]