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

use new sockets lib

Browse Source
This commit is contained in:
Veit Heller
2026-04-11 11:20:25 +02:00
parent 692fe51728
commit fafa2b40d2
5 changed files with 82 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files
docs/Redis.html
+5 -5
View File
@@ -3103,7 +3103,7 @@ respectively), and contains thin wrappers around all Redis commands through 7.2.
instantiate
</div>
<p class="sig">
(Fn [Socket] Redis)
(Fn [TcpStream] Redis)
</p>
<span>
@@ -4988,7 +4988,7 @@ respectively), and contains thin wrappers around all Redis commands through 7.2.
instantiate
</div>
<p class="sig">
(Fn [Redis, Socket] Redis)
(Fn [Redis, TcpStream] Redis)
</p>
<span>
@@ -5008,7 +5008,7 @@ respectively), and contains thin wrappers around all Redis commands through 7.2.
instantiate
</div>
<p class="sig">
(Fn [(Ref Redis a), Socket] ())
(Fn [(Ref Redis a), TcpStream] ())
</p>
<span>
@@ -5322,7 +5322,7 @@ respectively), and contains thin wrappers around all Redis commands through 7.2.
instantiate
</div>
<p class="sig">
(Fn [(Ref Redis a)] (Ref Socket a))
(Fn [(Ref Redis a)] (Ref TcpStream a))
</p>
<span>
@@ -5824,7 +5824,7 @@ respectively), and contains thin wrappers around all Redis commands through 7.2.
instantiate
</div>
<p class="sig">
(Fn [Redis, (Ref (Fn [Socket] Socket a) b)] Redis)
(Fn [Redis, (Ref (Fn [TcpStream] TcpStream a) b)] Redis)
</p>
<span>
docs/index.html
+60
View File
@@ -0,0 +1,60 @@
<!DOCTYPE HTML>
<html>
<head>
<meta charset="UTF-8">
<meta name="viewport" content="width=device-width, initial-scale=1.0, maximum-scale=1.0, user-scalable=0">
<link rel="stylesheet" href="../style.css">
</head>
<body>
<div class="content">
<a href="https://git.veitheller.de/carpentry/redis">
<div class="logo">
<img src="" alt="Logo">
<div class="index">
<ul>
<li>
<a href="RESP.html">
RESP
</a>
</li>
<li>
<a href="Redis.html">
Redis
</a>
</li>
</ul>
</div>
</div>
<div>
<h1>
redis
</h1>
<p>is a Redis client library for Carp, supporting Redis 7.x.</p>
<h2>Installation</h2>
<pre><code>(load &quot;https://git.veitheller.de/carpentry/redis.git@0.2.0&quot;)
</code></pre>
<h2>Example</h2>
<pre><code>(defn main []
(match (Redis.open &quot;127.0.0.1&quot;)
(Result.Success r)
(do
(println* &amp;(Redis.set &amp;r @&quot;key&quot; @&quot;value&quot;))
(println* &amp;(Redis.get &amp;r @&quot;key&quot;))
(println* &amp;(Redis.lrange &amp;r @&quot;mylist&quot; @&quot;0&quot; @&quot;-1&quot;))
(match (Redis.get &amp;r @&quot;key&quot;)
(Result.Success resp)
(match resp
(RESP.Str s) (println* &quot;got: &quot; &amp;s)
(RESP.Null) (println* &quot;not found&quot;)
_ (println* &quot;unexpected type&quot;))
(Result.Error e) (println* &quot;error: &quot; &amp;e))
(Redis.close r))
(Result.Error err) (IO.errorln &amp;err)))
</code></pre>
</div>
</a>
</div>
</body>
</html>