acf6a1d4de2e

--- a/src/gnuplot.lisp	Sun May 23 16:51:40 2021 -0400
+++ b/src/gnuplot.lisp	Sun May 23 16:53:10 2021 -0400
@@ -7,7 +7,8 @@
 (defparameter *gnuplot-path* "gnuplot")
 (defparameter *gnuplot-process* nil)
 
-(defmacro with-gnuplot (&body body)
+(defmacro with-gnuplot (options &body body)
+  (assert (null options))
   `(let ((*gnuplot-process*
            (external-program:start *gnuplot-path* '() :input :stream :output t)))
      (unwind-protect (progn ,@body *gnuplot-process*)
@@ -90,7 +91,7 @@
   `commands` must be a string or a sequence of strings.
 
   "
-  (with-gnuplot
+  (with-gnuplot ()
     (dolist (d data)
       (gnuplot-data (car d) (cdr d)))
     (etypecase commands