# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1621803190 14400
# Node ID acf6a1d4de2e9a202373d37df55a8d5ce05ad7e9
# Parent  ec9067ea1894839c4389ad5188de8f5ea7398d3f
Add options placeholder to `with-gnuplot`

diff -r ec9067ea1894 -r acf6a1d4de2e src/gnuplot.lisp
--- 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