 (defmethod parse-form* "defmacro"
   [form]
   (parse-defn-or-macro form))
+
+(defmethod parse-form* "defcurried"
+  [form]
+  (parse-defcurried form))
 
 (defmethod parse-form* nil
   [form]

    {:docstring docstring
     :type (if dynamic? "dynamic var" "var")}))

(defmulti parse-form*
  (fn [form]
    (cond

           (not (:private (meta (second form)))))
      "var"

      (and (= 'defcurried (first form))
           (not (:private (nth form 3 nil))))
      "defcurried"

      :else nil)))

(defmethod parse-form* "var"
