remove redundant :arglists from constructor metadata

defn computes arglists from the actual parameter vector.

Author: borkdude

src/sci/impl/deftype.cljc

@@ -175,8 +175,7 @@
             protocol-impls)]
        (emit-deftype rec-type record-name factory-fn-sym
                      `(defn ~(with-meta factory-fn-sym
-                               {:doc (str "Positional factory function for class " rec-type ".")
-                                :arglists (list fields)})
+                               {:doc (str "Positional factory function for class " rec-type ".")})
                         ~fields
                         (sci.impl.deftype/->type-impl '~rec-type ~record-name ~record-name (zipmap ~(list 'quote fields) ~fields)))
                      protocol-impls))))

src/sci/impl/records.cljc

@@ -343,8 +343,7 @@
                                             meta# (with-meta meta#)))))
 
        (defn ~(with-meta factory-fn-sym
-                {:doc (str "Positional factory function for class " rec-type ".")
-                 :arglists (list fields)})
+                {:doc (str "Positional factory function for class " rec-type ".")})
          (~fields
           (~constructor-fn-sym ~@fields nil nil)))
        (defn ~(with-meta map-factory-sym