Aryadev Chavali
5b05f2323c
Generates *LIST-SIZE* number of random numbers (within bounds 0, *UPPER-BOUND*) and inserts them one by one into bsearch.txt. Each number is separated by a newline.
10 lines
249 B
EmacsLisp
10 lines
249 B
EmacsLisp
(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*))))
|