yogsototh/marginalia
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Removed code to extract defmethod docstring has this feature isn't supported by Clojure yet.

Browse source
This commit is contained in:
Nicolas Buduroi 2011-03-14 07:42:19 +08:00 committed by Fogus
parent 8c8b9648fd
commit ae24c5d54c
2 changed files with 2 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/marginalia/parser.clj
View file

@ -160,11 +160,7 @@
(defmethod dispatch-form 'defmethod
[form raw nspace-sym]
(let [ds (nth form 3)
docstring (when (string? ds) ds)]
[docstring
(strip-docstring docstring raw)
nspace-sym]))
[nil raw nspace-sym])
(defmethod dispatch-form :default
[form raw nspace-sym]

3
src/problem_cases/general.clj
View file

@ -91,8 +91,7 @@
(defmulti kompile identity)
(defmethod kompile [::standard AutoIncClause]
"This is a docstring. On the left."
(defmethod kompile [:standard]
[_]
"GENERATED ALWAYS AS IDENTITY")