diff options
Diffstat (limited to 'impls/bsearch-gen.el')
| -rw-r--r-- | impls/bsearch-gen.el | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/impls/bsearch-gen.el b/impls/bsearch-gen.el new file mode 100644 index 0000000..79aac56 --- /dev/null +++ b/impls/bsearch-gen.el @@ -0,0 +1,9 @@ +(defconst *LIST-SIZE* 128) +(defconst *UPPER-BOUND* 1024) +(with-current-buffer (find-file "bsearch.txt") + (mapcar + #'(lambda (res) (insert (format "%s\n" res))) + (cl-loop + for i from 0 to *LIST-SIZE* + collect + (random *UPPER-BOUND*)))) |