hoplon / boot-hoplon

Boot task to build Hoplon web applications.
Eclipse Public License 1.0
8 stars 5 forks source link

Fails using clojure "1.9.0-alpha13" because of spec #7

Closed mynomoto closed 8 years ago

mynomoto commented 8 years ago

Stack trace below, I will send a pr shortly to fix this.

clojure.lang.Compiler$CompilerException: clojure.lang.ExceptionInfo: Call to clojure.core/defn did not conform to spec:
                                         In: [1 0] val: ({:keys (attrs)} writer) fails spec: :clojure.core.specs/arg-list at: [:args :bs :arity-1 :args] predicate: (cat :args (* :clojure.core.specs/binding-form) :varargs (? (cat :amp #{(quote &)} :form :clojure.core.specs/binding-form))),  Extra input                                                                                                                      
                                         In: [1 0] val: {:keys (attrs)} fails spec: :clojure.core.specs/arg-list at: [:args :bs :arity-n :bodies :args] predicate: vector?                                        
                                         :clojure.spec/args  (write-attributes [{:keys (attrs)} writer] (doseq [[k v] attrs] (if (namespace k) (.writeAttribute writer (str (namespace k)) (name k) (str v)) (.writeAttribute writer (name k) (str v)))))                                                                                                                                                                           
                                          {:clojure.spec/problems ({:path [:args :bs :arity-1 :args], :reason "Extra input", :pred (cat :args (* :clojure.core.specs/binding-form) :varargs (? (cat :amp #{(quote &)} :form :clojure.core.specs/binding-form))), :val ({:keys (attrs)} writer), :via [:clojure.core.specs/defn-args :clojure.core.specs/args+body :clojure.core.specs/arg-list :clojure.core.specs/arg-list], :in [1 0]} {:path [:args :bs :arity-n :bodies :args], :pred vector?, :val {:keys (attrs)}, :via [:clojure.core.specs/defn-args :clojure.core.specs/args+body :clojure.core.specs/args+body :clojure.core.specs/args+body :clojure.core.specs/arg-list :clojure.core.specs/arg-list], :in [1 0]}), :clojure.spec/args (write-attributes [{:keys (attrs)} writer] (doseq [[k v] attrs] (if (namespace k) (.writeAttribute writer (str (namespace k)) (name k) (str v)) (.writeAttribute writer (name k) (str v)))))}, compiling:(clojure/data/xml.clj:30:1)                                                                                                   
             clojure.lang.ExceptionInfo: Call to clojure.core/defn did not conform to spec:
                                         In: [1 0] val: ({:keys (attrs)} writer) fails spec: :clojure.core.specs/arg-list at: [:args :bs :arity-1 :args] predicate: (cat :args (* :clojure.core.specs/binding-form) :varargs (? (cat :amp #{(quote &)} :form :clojure.core.specs/binding-form))),  Extra input                                                                                                                      
                                         In: [1 0] val: {:keys (attrs)} fails spec: :clojure.core.specs/arg-list at: [:args :bs :arity-n :bodies :args] predicate: vector?                                        
                                         :clojure.spec/args  (write-attributes [{:keys (attrs)} writer] (doseq [[k v] attrs] (if (namespace k) (.writeAttribute writer (str (namespace k)) (name k) (str v)) (.writeAttribute writer (name k) (str v))))) 

    data: {#object[clojure.lang.Keyword 0x3643e91 ":clojure.spec/problems"] ({#object[clojure.lang.Keyword 0x3fb214db ":path"] [#object[clojure.lang.Keyword 0x3b7f482e ":args"] #object[clojure.lang.Keyword 0x1d80250a ":bs"] #object[clojure.lang.Keyword 0x7788508f ":arity-1"] #object[clojure.lang.Keyword 0x3b7f482e ":args"]], #object[clojure.lang.Keyword 0x171b3c40 ":reason"] "Extra input", #object[clojure.lang.Keyword 0x3820f6b4 ":pred"] (#object[clojure.lang.Symbol 0x24943ccf "cat"] #object[clojure.lang.Keyword 0x3b7f482e ":args"] (#object[clojure.lang.Symbol 0x11ad0cfa "*"] #object[clojure.lang.Keyword 0x5f1adbb3 ":clojure.core.specs/binding-form"]) #object[clojure.lang.Keyword 0x603003b2 ":varargs"] (#object[clojure.lang.Symbol 0x6547393f "?"] (#object[clojure.lang.Symbol 0x1c7423b1 "cat"] #object[clojure.lang.Keyword 0x15bab4cf ":amp"] #{(#object[clojure.lang.Symbol 0x75771859 "quote"] #object[clojure.lang.Symbol 0x29a55909 "&"])} #object[clojure.lang.Keyword 0x67cb8ea2 ":form"] #object[clojure.lang.Keyword 0x5f1adbb3 ":clojure.core.specs/binding-form"]))), #object[clojure.lang.Keyword 0xca682ff ":val"] ({#object[clojure.lang.Keyword 0x464a24a5 ":keys"] (#object[clojure.lang.Symbol 0x14f19e27 "attrs"])} #object[clojure.lang.Symbol 0x54ad4cba "writer"]), #object[clojure.lang.Keyword 0x19d523a6 ":via"] [#object[clojure.lang.Keyword 0x1abb4c84 ":clojure.core.specs/defn-args"] #object[clojure.lang.Keyword 0x223f952 ":clojure.core.specs/args+body"] #object[clojure.lang.Keyword 0x3cd5ad30 ":clojure.core.specs/arg-list"] #object[clojure.lang.Keyword 0x3cd5ad30 ":clojure.core.specs/arg-list"]], #object[clojure.lang.Keyword 0xc2d711f ":in"] [1 0]} {#object[clojure.lang.Keyword 0x3fb214db ":path"] [#object[clojure.lang.Keyword 0x3b7f482e ":args"] #object[clojure.lang.Keyword 0x1d80250a ":bs"] #object[clojure.lang.Keyword 0x4cb2c372 ":arity-n"] #object[clojure.lang.Keyword 0x51464adf ":bodies"] #object[clojure.lang.Keyword 0x3b7f482e ":args"]], #object[clojure.lang.Keyword 0x3820f6b4 ":pred"] #object[clojure.lang.Symbol 0x406bd1ea "vector?"], #object[clojure.lang.Keyword 0xca682ff ":val"] {#object[clojure.lang.Keyword 0x464a24a5 ":keys"] (#object[clojure.lang.Symbol 0x14f19e27 "attrs"])}, #object[clojure.lang.Keyword 0x19d523a6 ":via"] [#object[clojure.lang.Keyword 0x1abb4c84 ":clojure.core.specs/defn-args"] #object[clojure.lang.Keyword 0x223f952 ":clojure.core.specs/args+body"] #object[clojure.lang.Keyword 0x223f952 ":clojure.core.specs/args+body"] #object[clojure.lang.Keyword 0x223f952 ":clojure.core.specs/args+body"] #object[clojure.lang.Keyword 0x3cd5ad30 ":clojure.core.specs/arg-list"] #object[clojure.lang.Keyword 0x3cd5ad30 ":clojure.core.specs/arg-list"]], #object[clojure.lang.Keyword 0xc2d711f ":in"] [1 0]}), #object[clojure.lang.Keyword 0x27a9e571 ":clojure.spec/args"] (#object[clojure.lang.Symbol 0x7dda0ba5 "write-attributes"] [{#object[clojure.lang.Keyword 0x464a24a5 ":keys"] (#object[clojure.lang.Symbol 0x14f19e27 "attrs"])} #object[clojure.lang.Symbol 0x54ad4cba "writer"]] (#object[clojure.lang.Symbol 0x1ea9a673 "doseq"] [[#object[clojure.lang.Symbol 0xd3c0cd "k"] #object[clojure.lang.Symbol 0x68b93fcb "v"]] #object[clojure.lang.Symbol 0x4593965a "attrs"]] (#object[clojure.lang.Symbol 0x165a2aa5 "if"] (#object[clojure.lang.Symbol 0x891450b "namespace"] #object[clojure.lang.Symbol 0x297774b5 "k"]) (#object[clojure.lang.Symbol 0x700f1687 ".writeAttribute"] #object[clojure.lang.Symbol 0x37471521 "writer"] (#object[clojure.lang.Symbol 0x35fcb7df "str"] (#object[clojure.lang.Symbol 0x27bcbf09 "namespace"] #object[clojure.lang.Symbol 0x2f0f3e57 "k"])) (#object[clojure.lang.Symbol 0x20eed88a "name"] #object[clojure.lang.Symbol 0x707cc107 "k"]) (#object[clojure.lang.Symbol 0x327a7cf6 "str"] #object[clojure.lang.Symbol 0x64510168 "v"])) (#object[clojure.lang.Symbol 0x32adbfe0 ".writeAttribute"] #object[clojure.lang.Symbol 0x244f344b "writer"] (#object[clojure.lang.Symbol 0x453371f8 "name"] #object[clojure.lang.Symbol 0x29056277 "k"]) (#object[clojure.lang.Symbol 0x76088a08 "str"] #object[clojure.lang.Symbol 0x2b3805ee "v"