Commit 7ea707d9 authored by Zach Beane's avatar Zach Beane
Browse files

Add stubs for MAKE-SSL-SERVER-STREAM and MAKE-SSL-CLIENT-STREAM.

parent 8154dbaf
......@@ -137,3 +137,11 @@
(defun socket:lookup-hostname (name)
(lookup-hostname name))
(defun socket::make-ssl-server-stream (&rest args)
(declare (ignore args))
(error "Not implemented -- MAKE-SSL-SERVER-STREAM"))
(defun socket::make-ssl-client-stream (&rest args)
(declare (ignore args))
(error "Not implemented -- MAKE-SSL-CLIENT-STREAM"))
......@@ -234,6 +234,8 @@
(defpackage #:socket
(:use)
(:intern #:make-ssl-server-stream
#:make-ssl-client-stream)
(:export #:make-socket
#:socket-error
#:accept-connection
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment