ignore value.
This commit is contained in:
parent
e454baf99a
commit
3117e468b0
1 changed files with 1 additions and 1 deletions
|
@ -26,7 +26,7 @@ openConnection s p = do
|
||||||
return CertificateUsageAccept
|
return CertificateUsageAccept
|
||||||
}
|
}
|
||||||
ctx <- connectionClient s p params rng
|
ctx <- connectionClient s p params rng
|
||||||
handshake ctx
|
_ <- handshake ctx
|
||||||
bye ctx
|
bye ctx
|
||||||
r <- readIORef ref
|
r <- readIORef ref
|
||||||
case r of
|
case r of
|
||||||
|
|
Loading…
Reference in a new issue