luciano/babashka
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Enhance docstring example

Browse source
This commit is contained in:
Michiel Borkent 2020-02-20 12:45:44 +01:00
parent b66c14fec6
commit f812868c2b
2 changed files with 16 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
README.md
View file

@ -949,12 +949,14 @@ Original by [@souenzzo](https://gist.github.com/souenzzo/a959a4c5b8c0c90df76fe33
### Print random docstring ### Print random docstring
See [examples/random_doc.clj](https://github.com/borkdude/babashka/blob/master/examples/random_doc.clj)
``` shell ``` shell
$ bb "(defmacro random-doc [] (let [sym (-> (ns-publics 'clojure.core) keys rand-nth)] \`(clojure.repl/doc ~sym))) (random-doc)" $ examples/random_doc.clj
------------------------- -------------------------
clojure.core/keyword? clojure.core/ffirst
([x]) ([x])
Return true if x is a Keyword Same as (first (first x))
``` ```
## Thanks ## Thanks

11
examples/random_doc.clj Executable file
View file

@ -0,0 +1,11 @@
#!/usr/bin/env bb
(require '[clojure.repl])
(defmacro random-doc []
(let [sym (-> (ns-publics 'clojure.core) keys rand-nth)]
(if (:doc (meta (resolve sym)))
`(clojure.repl/doc ~sym)
`(random-doc))))
(random-doc)