carpentry/redis
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

redis: add autodocs

Browse Source
This commit is contained in:
Veit Heller
2020-02-09 23:45:49 +01:00
parent 307ea9d482
commit e58dcbe479
1 changed files with 6 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
redis.carp
View File

@@ -139,6 +139,12 @@
(defmacro defredis [cmd :rest args] (defmacro defredis [cmd :rest args]
(list 'defmodule 'Redis (list 'defmodule 'Redis
(list 'doc cmd (String.join [
"is a wrapper around the `" (rtreat- (Symbol.str cmd)) "` Redis command.
It takes the same arguments as the [Redis command](https://redis.io/commands/"
(Symbol.str cmd) ")."
]))
(list 'defn cmd (cadr (collect-into (cons 'r args) array)) (list 'defn cmd (cadr (collect-into (cons 'r args) array))
(list 'do (list 'do
(list 'Redis.send 'r (list 'copy (rtreat- (Symbol.str cmd))) (list 'ref (rconv- args))) (list 'Redis.send 'r (list 'copy (rtreat- (Symbol.str cmd))) (list 'ref (rconv- args)))