summaryrefslogtreecommitdiff
path: root/bytepusher.scm
diff options
context:
space:
mode:
Diffstat (limited to 'bytepusher.scm')
-rw-r--r--bytepusher.scm6
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)))