summary refs log tree commit diff stats
path: root/lib/impure/ssl.nim
diff options
context:
space:
mode:
Diffstat (limited to 'lib/impure/ssl.nim')
-rw-r--r--lib/impure/ssl.nim6
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/impure/ssl.nim b/lib/impure/ssl.nim
index e90488a2b..ab53d0538 100644
--- a/lib/impure/ssl.nim
+++ b/lib/impure/ssl.nim
@@ -74,6 +74,12 @@ proc send*(sock: TSecureSocket, data: string) =
   if BIO_write(sock.bio, data, data.len()) <= 0:
     OSError()
 
+proc close*(sock: TSecureSocket) =
+  ## Closes the socket
+  if BIO_free(sock.bio) <= 0:
+    ERR_print_errors_fp(stderr)
+    OSError()
+
 when isMainModule:
   var s: TSecureSocket
   echo connect(s, "smtp.gmail.com", 465)