[ fix ] type error

stefan-hoeck · Nov 30, 2023 · aacb312 · aacb312
1 parent ccb70ce
commit aacb312
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/System/UV/DNS.idr b/src/System/UV/DNS.idr
@@ -110,7 +110,7 @@ getAddrInfo n s (SI f t p) cb = do
   res   <- uv_getaddrinfo
     l.loop
     pg
-    (\pa,st,pa => freePtr pa >> freePtr hints cb (uvRes st $> pa))
+    (\pa,st,pa => freePtr pa >> freePtr hints >> cb (uvRes st $> pa))
     n
     s
     hints