X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tools-for-build%2Fgrovel-headers.c;h=1b61f98e8938704d96b1e5e10e0a0df82e0874d1;hb=ab5427d31da2bd95805cccc8e47b8f43d3dd606d;hp=6c42bd1e8c76249337e1a38d364ee6d85608ff57;hpb=07d0cf7fe8476add89af98a4aeebb8437f07103e;p=sbcl.git diff --git a/tools-for-build/grovel-headers.c b/tools-for-build/grovel-headers.c index 6c42bd1..1b61f98 100644 --- a/tools-for-build/grovel-headers.c +++ b/tools-for-build/grovel-headers.c @@ -18,6 +18,8 @@ * more information. */ +#include "genesis/config.h" + #include #include #include @@ -30,17 +32,14 @@ #include #undef boolean #else + #include + #include #include #include #include #include - #ifdef __APPLE_CC__ - #include "../src/runtime/darwin-dlshim.h" - #include "../src/runtime/darwin-langinfo.h" - #else - #include - #include - #endif + #include + #include #endif #include @@ -49,8 +48,6 @@ #include #include -#include "genesis/config.h" - #ifdef LISP_FEATURE_HPUX #include /* for TIOCGPGRP */ #endif @@ -242,6 +239,9 @@ main(int argc, char *argv[]) DEFTYPE("wst-nlink-t", wst_nlink_t); DEFTYPE("wst-uid-t", wst_uid_t); DEFTYPE("wst-gid-t", wst_gid_t); + + /* KLUDGE */ + defconstant("fd-setsize", 1024); printf("\n"); #else printf("(in-package \"SB!ALIEN\")\n\n"); @@ -254,6 +254,16 @@ main(int argc, char *argv[]) printf("(in-package \"SB!UNIX\")\n\n"); + printf(";;; select()\n"); + defconstant("fd-setsize", FD_SETSIZE); + + printf(";;; poll()\n"); + defconstant("pollin", POLLIN); + defconstant("pollout", POLLOUT); + defconstant("pollpri", POLLPRI); + defconstant("pollhup", POLLHUP); + DEFTYPE("nfds-t", nfds_t); + printf(";;; langinfo\n"); defconstant("codeset", CODESET);