Artifact 663846f6249066674ff1afca289f68ab1e499dfb:


(require-library canvas-draw-base)

(module canvas-draw-printer
	(context:printer)
	(import scheme chicken foreign canvas-draw-base)

;; {{{ Data types

(foreign-declare
	"#include <cd.h>\n"
	"#include <cdprint.h>\n")

(include "canvas-draw-types.scm")

;; }}}

;; {{{ Context types

(define context:printer
	(foreign-value "CD_PRINTER" nonnull-context))

;; }}}

)