You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
typesetting/pitfall/ptest/test8.rkt

19 lines
512 B
Racket

#lang racket/base
(require pitfall/pdftest)
(define-runtime-path pic "assets/test.png")
(define (proc doc)
[font doc "Helvetica-Bold"]
[font-size doc 25]
[text doc "Another fantastic pic" 100 100]
[image doc pic 100 160 (hash 'width 412)])
; node's zlib.deflate makes smaller files, for some reason
; so don't compare file sizes in this case
(define-runtime-path this "test8rkt.pdf")
(make-doc this #f proc #:pdfkit #f)
(define-runtime-path that "test8crkt.pdf")
(make-doc that #t proc #:pdfkit #f)