Merge pull request #124 from MichaelBlume/fix-arglists

fix arglist metadata
This commit is contained in:
Dave Della Costa 2016-07-12 10:00:36 -06:00 committed by GitHub
commit f23d687423

View file

@ -23,7 +23,11 @@
(build-clause ~kw m# args#)))
;; maintain the original arglist instead of getting
;; ([& args__6880__auto__])
(alter-meta! assoc :arglists '(~arglist))))))
(alter-meta!
assoc
:arglists
'(~(into [] (rest arglist))
~(into [(first arglist)] (rest arglist))))))))
(defn collify [x]
(if (coll? x) x [x]))