      (compile res nil))
 
   ([res {:keys [passes emitter settings] :as config}]
-     {:pre [(every? fn? passes)
+     {:pre [(seq? passes)
+            (every? fn? passes)
             (fn? emitter)]}
      (let [forms (atom [])
            defs  (atom {})

               (when debug?
                 (println *ns* "|" form))
               (eval form options)
               (recur)))))
       nil)))


(defn compile

       ;; Having taken an O(Nᵏ) compile operation to the face we now
       ;; run the emitter and call it quits.
       (let [settings (:emitter settings)]
         (emitter @forms)))
     nil))
