SERIES を series:install して使うときの defpackage

LET LET* MULTIPLE-VALUE-BIND FUNCALL DEFUN を shadowing import するので defpackage をラップするマクロがあると楽。

(defmacro sdefpackage (package &rest options)
  `(progn
     (defpackage ,package
       ,@options
       (:use :series)
       (:shadowing-import-from :series ,@series::/series-forms/))
     (series::install :pkg ,package :implicit-map t)))