diff options
| author | Ekaitz Zarraga <ekaitz@elenq.tech> | 2022-07-14 22:53:36 +0200 |
|---|---|---|
| committer | Ekaitz Zarraga <ekaitz@elenq.tech> | 2022-07-14 22:53:36 +0200 |
| commit | 1ece633465755b7dc17b41e9d7a711eeee5f9684 (patch) | |
| tree | 419e3d1470faa4aa521ad84b5fc1aea5de9bc487 | |
| parent | ce8b5828ce57496efc971aec4416693a27e5bb57 (diff) | |
Fix loop frame amount and indentation
| -rw-r--r-- | bytepusher.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/bytepusher.scm b/bytepusher.scm index 81682da..b71861e 100644 --- a/bytepusher.scm +++ b/bytepusher.scm @@ -185,9 +185,9 @@ (values a b c))) (define (loop-frame!) - (let loop ((count 65536)) - (execute! (get-pc)) - (unless (= count 0) (loop (- count 1))))) + (let loop ((count 65535)) + (execute! (get-pc)) + (unless (= count 0) (loop (- count 1))))) (define (handle-key! action! key) (let ((index (hashq-ref key-ids key))) |