From d75a344bee405cdb6a337decacca042a500b5c79 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Fri, 18 Dec 2020 23:58:09 -0800 Subject: [PATCH] Update module.rkt --- beautiful-racket-lib/br/module.rkt | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/beautiful-racket-lib/br/module.rkt b/beautiful-racket-lib/br/module.rkt index 731c774..fe93f85 100644 --- a/beautiful-racket-lib/br/module.rkt +++ b/beautiful-racket-lib/br/module.rkt @@ -71,8 +71,8 @@ (define end (+ current-idx how-many)) (bytes-copy! bs 0 current-bs current-idx end) (set! current-idx end) - (set! col (+ col how-many)) - (set! pos (+ pos how-many)) + (set! col (+ (or col 0) how-many)) + (set! pos (+ (or pos 0) how-many)) (unless (< current-idx (bytes-length current-bs)) (consume-ss!)) how-many]