reform

fontland/fontland/glyph.rkt

@@ -18,6 +18,10 @@ https://github.com/mbutterick/fontkit/blob/master/src/glyph/Glyph.js
 ; There are several subclasses of the base Glyph class internally that may be returned depending
 ; on the font format, but they all inherit from this class.
 
+(define (is-mark? codepoint)
+  ;; mark classes = Mn Me Mc
+  (regexp-match #px"\\p{Mn}|\\p{Me}|\\p{Mc}" (string (integer->char codepoint))))
+
 (define (+glyph id codepoints font
                 [is-mark? (andmap is-mark? codepoints)]
                 [is-ligature? (> (length codepoints) 1)]

fontland/fontland/tables.rkt

@@ -14,7 +14,6 @@ https://github.com/mbutterick/fontkit/blob/master/src/tables/index.js
                                                (syntax->list #'(TABLE-ID ...)))]) 
                    #'(begin
                        (r+p TABLE-ID-STRING ...)
-                       (test-module (require (submod TABLE-ID-STRING test) ...))
                        (define ID (make-hasheq (map cons (list 'TABLE-ID ...) (list TABLE-ID ...))))))]))
 
 (define-table-codecs table-codecs head hhea hmtx maxp OS/2 post cvt_ fpgm loca prep glyf)