Matthew Butterick 8 years ago
parent 2fc8afff93
commit 42281449c5

@ -86,10 +86,10 @@
(define/public (_decodeSimple glyph stream)
(unless (RGlyfHeader? glyph)
(raise-argument-error 'TTFGlyph-_decodeSimple "glyph" glyph))
(raise-argument-error 'TTFGlyph-_decodeSimple "RGlyfHeader" glyph))
(unless (DecodeStream? stream)
(raise-argument-error 'TTFGlyph-_decodeSimple "stream" stream))
(raise-argument-error 'TTFGlyph-_decodeSimple "DecodeStream" stream))
;; this is a simple glyph
(hash-set! glyph 'points empty)

Loading…
Cancel
Save