;; This program is free software: you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by ;; the Free Software Foundation, either version 3 of the License, or (at ;; your option) any later version. ;; This program is distributed in the hope that it will be useful, but ;; WITHOUT ANY WARRANTY; without even the implied warranty of ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU ;; General Public License for more details. ;; A full copy of the GPL license can be found at ;; . (module data-generators (%random-fixnum gen-current-fixnum-min gen-current-fixnum-max gen-current-default-size gen-int8 gen-uint8 gen-int16 gen-uint16 gen-int32 gen-uint32 gen-int64 gen-uint64 gen-bool gen-char gen-real gen-pair-of gen-list-of gen-alist-of gen-tuple-of gen-vector-of gen-string-of gen-fixnum gen-hash-table-of gen-sample-of make-sizer sizer/lb sizer/ub between at-most at-least with-size gen->sequence run-sequence) (import chicken scheme) (use (prefix random-bsd bsd:) (only ports with-output-to-string) (only srfi-1 iota list-tabulate list-ref) srfi-14 srfi-69 numbers) (include "data-generators-impl.scm"))