;;;; FiveAM provides the ability to automatically generate a
;;;; collection of random input data for a specific test and run a
;;;; FiveAM provides the ability to automatically generate a
;;;; collection of random input data for a specific test and run a
;;;; Since this is random testing we need some way of creating random
;;;; data to feed to our code. Generators are regular functions whcih
;;;; Since this is random testing we need some way of creating random
;;;; data to feed to our code. Generators are regular functions whcih
(+ min (random (1+ (- max min)))))
(defgenerator gen-character (&key (code (gen-integer :min 0 :max (1- char-code-limit)))
(+ min (random (1+ (- max min)))))
(defgenerator gen-character (&key (code (gen-integer :min 0 :max (1- char-code-limit)))