From fa05e3c37ab9da1e06089b76d9526a901de5e977 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Fri, 7 Jul 2017 08:50:11 -0700 Subject: [PATCH] later --- pitfall/fontkit/ot-processor.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/pitfall/fontkit/ot-processor.rkt b/pitfall/fontkit/ot-processor.rkt index 25b91a1c..4b7846cf 100644 --- a/pitfall/fontkit/ot-processor.rkt +++ b/pitfall/fontkit/ot-processor.rkt @@ -146,7 +146,7 @@ https://github.com/mbutterick/fontkit/blob/master/src/opentype/OTProcessor.js (define pos (· this glyphIterator index)) (define glyph (send (· this glyphIterator) increment sequenceIndex)) (define idx 0) - (report*/file (list-ref sequence idx) glyph (· glyph id)) + (report*/file (list-ref sequence idx) glyph (and glyph (· glyph id))) (while (and (< idx (length sequence)) glyph (fn (list-ref sequence idx) (· glyph id))) (report* 'in-match-loop idx (· glyph id))