(require-library canvas-draw-base) (module canvas-draw-svg (context:svg) (import scheme chicken foreign canvas-draw-base) ;; {{{ Data types (foreign-declare "#include \n" "#include \n") (include "canvas-draw-types.scm") ;; }}} ;; {{{ Context types (define context:svg (foreign-value "CD_SVG" nonnull-context)) ;; }}} )