diff --git a/fontland/fontland/cmap-processor.rkt b/fontland/fontland/cmap-processor.rkt deleted file mode 100644 index ef59c59f..00000000 --- a/fontland/fontland/cmap-processor.rkt +++ /dev/null @@ -1,7 +0,0 @@ -#lang racket/base -(require "racket.rkt") - -(provide CmapProcessor) - -(define-subclass object% (CmapProcessor cmapTable) - (super-new)) \ No newline at end of file diff --git a/fontland/fontland/font.rkt b/fontland/fontland/font.rkt index aa8dee39..6f691da4 100644 --- a/fontland/fontland/font.rkt +++ b/fontland/fontland/font.rkt @@ -1,6 +1,6 @@ #lang debug racket/base (require "racket.rkt") -(require "freetype-ffi.rkt" (except-in ffi/unsafe -> array?) racket/runtime-path "subset.rkt" "glyph.rkt" "bbox.rkt" "glyphrun.rkt" "cmap-processor.rkt" "directory.rkt" xenomorph "tables.rkt" "ttfglyph.rkt") +(require "freetype-ffi.rkt" (except-in ffi/unsafe -> array?) racket/runtime-path "subset.rkt" "glyph.rkt" "bbox.rkt" "glyphrun.rkt" "directory.rkt" xenomorph "tables.rkt" "ttfglyph.rkt") (provide (all-defined-out)) #| @@ -191,12 +191,6 @@ https://github.com/mbutterick/fontkit/blob/master/src/TTFFont.js (test-module (check-equal? (bbox->list (· f bbox)) '(-161 -236 1193 963))) - -(define/contract (_cmapProcessor this) - (->m (is-a?/c CmapProcessor)) - (make-object CmapProcessor (· this cmap))) - - ;; Returns a Subset for this font. (define/contract (createSubset this) (->m (is-a?/c Subset))