Artifact dff4d2cf55f2f16907dcc954aff0a1d6d3eca440:

• File canvas-draw/chicken/canvas-draw-metafile.scm — part of check-in [ed10f826ff] at 2011-01-30 17:39:09 on branch trunk — Re-ran configure in ffcall and imported canvas-draw source (user: matt, size: 367) [annotate] [blame] [check-ins using]

(require-library canvas-draw-base)

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

;; {{{ Data types

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

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

;; }}}

;; {{{ Context types

(define context:metafile
	(foreign-value "CD_METAFILE" nonnull-context))

;; }}}

)