Make open_socket static and register in socket.c.

* lisplib.c (sock_set_entries): Add auto-load entry
for open-socket.

* socket.c (open_socket): Change to static.
(sock_load_init): Register open-socket intrinsic
here rather than in stream.c.

* stream.c (stream_init): Remove registration of
open-socket intrinsic.

* stream.h (open_socket): Declaration removed.

1 files changed, 0 insertions, 3 deletions

diff --git a/stream.h b/stream.h
index a5275b63..920cdf3e 100644
--- a/stream.h
+++ b/stream.h
@@ -191,9 +191,6 @@ val get_string(val stream, val nchars, val close_after_p);
 val open_directory(val path);
 val open_file(val path, val mode_str);
 val open_fileno(val fd, val mode_str);
-#if HAVE_SOCKETS
-val open_socket(val family, val type, val mode_str);
-#endif
 val open_tail(val path, val mode_str, val seek_end_p);
 val open_command(val path, val mode_str);
 val open_process(val path, val mode_str, val args);