test19 (embed otf)

pitfall/pitfall/test/test19.coffee

@@ -0,0 +1,20 @@
+PDFDocument = require 'pdfkit'
+fs = require 'fs'
+
+make = (doc) -> 
+
+  # Register a font name for use later
+  doc.registerFont('the-font', 'assets/fira.otf')
+
+  # Set the font, draw some text
+  doc.font('the-font')
+     .fontSize(100)
+     .text('x', 100, 100, {width: false})
+                 
+  doc.end()
+
+
+doc = new PDFDocument({compress: no})
+doc.pipe(fs.createWriteStream('test19.pdf'))
+make doc
+

pitfall/pitfall/test/test19.rkt

@@ -0,0 +1,21 @@
+#lang pitfall/pdftest
+
+;; subset font with GPOS table
+(define-runtime-path ttf-path "assets/fira.ttf")
+
+(define (proc doc)
+  ;; Register a font name for use later
+  (send doc registerFont "the-font" (path->string ttf-path))
+
+  ;; Set the font, draw some text
+  (send* doc
+    [font "the-font"]
+    [fontSize 25]
+    [text "Hola Hola" 100 100 (hash 'width #f)]))
+
+;; test against non-subsetted font version
+(define-runtime-path this "test14rkt.pdf")
+(make-doc this #f proc )
+
+(define-runtime-path that "test14crkt.pdf")
+(make-doc that #t proc #:pdfkit #f)