(use ploticus)


(assert (zero? (init 'svg "chicken.svg" )))
(assert (zero? (arg "-scale" "0.8")))
(for-each (lambda (line) (assert (zero? (execline line))))
	  '("#proc annotate" 
	    "location: 2 2" 
	    "text: Chicken" 
	    "Scheme" 
	    ""))
(assert (zero? (end)))