Always use float in sleep

This commit is contained in:
Benjamin Vedder 2022-04-03 15:02:26 +02:00
parent 9ba18b505d
commit 1c26cf2405
1 changed files with 1 additions and 1 deletions

View File

@ -72,7 +72,7 @@ static const char* functions[] = {
"(map-rec f (cons (f (car lst) (car ys)) res) (cdr lst) (cdr ys))))))"
"(map-rec f nil x y)))",
"(defun sleep (seconds) (yield (* seconds 1000000)))",
"(defun sleep (seconds) (yield (* seconds 1000000.0)))",
"(defun filter (f lst)"
"(let ((filter-rec (lambda (f lst ys)"