From 822beed88eed7cbdd5e63e338dcb3405e9c3e501 Mon Sep 17 00:00:00 2001
From: Raymond Toy <toy.raymond@gmail.com>
Date: Tue, 2 Dec 2014 20:18:57 -0800
Subject: [PATCH] Try to collect some of the unix export names by file in which
 they are used.

Mostly as information on who uses what, but otherwise not necessary.
---
 src/code/exports.lisp | 57 ++++++++++++++++++++++++++-----------------
 1 file changed, 35 insertions(+), 22 deletions(-)

diff --git a/src/code/exports.lisp b/src/code/exports.lisp
index d0aa627c4..25a59f184 100644
--- a/src/code/exports.lisp
+++ b/src/code/exports.lisp
@@ -226,7 +226,6 @@
 	   "UNIX-MKDIR"
 	   "UNIX-RMDIR"
 	   "UNIX-UNLINK"
-	   "UNIX-SETITIMER"
 	   "TIMEZONE"
 	   "TIMEVAL"
 	   "SIZE-T"
@@ -234,18 +233,42 @@
 	   "INO-T"
 	   "DEV-T"
 	   "TIME-T"
-	   "FD-SETSIZE"
-	   "FD-ISSET"
-	   "FD-CLR"
 	   "TIME-T"
 	   "USER-INFO-NAME"
 	   "INT64-T"
 	   "MODE-T"
 	   "UNIX-FAST-SELECT"
-	   "UNIX-IOCTL"
-	   "UNIX-OPENPTY"
 	   "UNIX-PIPE"
 	   "UNIX-GETPID"
+	   "UNIX-GETHOSTID"
+	   "UNIX-UID"
+	   "UNIX-GID"
+	   "GET-UNIX-ERROR-MSG"
+	   "TCHARS"
+	   "WINSIZE"
+	   "LTCHARS"
+	   "TIMEVAL"
+	   "CLOSE-DIR"
+	   "OPEN-DIR"
+	   "READ-DIR"
+	   "D-NAMLEN"
+
+	   ;; filesys.lisp
+	   "UNIX-GETPWUID"
+	   
+	   ;; multi-proc.lisp
+	   "UNIX-SETITIMER"
+
+	   ;; run-program.lisp
+	   "SGTTYB"
+	   "UNIX-TTYNAME"
+	   "UNIX-IOCTL"
+	   "UNIX-OPENPTY"
+
+	   ;; alien-callback.lisp
+	   "UNIX-MPROTECT"
+
+	   ;; internet.lisp
 	   "UNIX-SOCKET"
 	   "UNIX-CONNECT"
 	   "UNIX-BIND"
@@ -260,23 +283,13 @@
 	   "UNIX-RECVFROM"
 	   "UNIX-SENDTO"
 	   "UNIX-SHUTDOWN"
-	   "UNIX-GETHOSTID"
 	   "UNIX-FCNTL"
-	   "UNIX-UID"
-	   "UNIX-GID"
-	   "UNIX-GETPWUID"
-	   "UNIX-MPROTECT"
-	   "GET-UNIX-ERROR-MSG"
-	   "SGTTYB"
-	   "TCHARS"
-	   "UNIX-TTYNAME"
-	   "WINSIZE"
-	   "LTCHARS"
-	   "TIMEVAL"
-	   "CLOSE-DIR"
-	   "OPEN-DIR"
-	   "READ-DIR"
-	   "D-NAMLEN"
+	   
+	   ;; serve-event.lisp
+	   "FD-SETSIZE"
+	   "FD-ISSET"
+	   "FD-CLR"
+
 	   ;; Simple streams
 	   "PROT_READ"
 	   "UNIX-MMAP"
-- 
GitLab