 
 (defn make-size-range-seq
   [max-size]
-  (cycle (range 1 max-size)))
+  (cycle (range 0 max-size)))
 
 (defn sample-seq
   ([generator] (sample-seq generator 100))


(defn string-ascii-gen
  [rand-seed size]
  (clojure.string/join (repeatedly size #(call-gen char-ascii rand-seed size))))

(def string-ascii
  "Generate ascii strings."


(defn string-gen
  [rand-seed size]
  (clojure.string/join (repeatedly (call-gen (choose 0 size) rand-seed size)
                                   #(call-gen char rand-seed size))))

(def string
  "Generate strings."
