Skip to content
Snippets Groups Projects
Commit 3861a7bf authored by ram's avatar ram
Browse files

Solaris patches.

parent 68d8faf0
No related branches found
No related tags found
No related merge requests found
/* Routines that must be linked into the core for lisp to work. */ /* Routines that must be linked into the core for lisp to work. */
/* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/undefineds.c,v 1.2 1993/08/18 22:14:34 wlott Exp $ */ /* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/undefineds.c,v 1.2.1.1 1994/10/24 19:52:41 ram Exp $ */
#ifdef sun #ifdef sun
#ifndef MACH #ifndef MACH
#if !defined(SUNOS) && !defined(SOLARIS)
#define SUNOS #define SUNOS
#endif #endif
#endif #endif
#endif
typedef int func(); typedef int func();
......
/* Routines that must be linked into the core for lisp to work. */ /* Routines that must be linked into the core for lisp to work. */
/* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/undefineds.h,v 1.2 1993/07/27 15:11:19 hallgren Exp $ */ /* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/undefineds.h,v 1.2.1.1 1994/10/24 19:52:44 ram Exp $ */
/* Pick up all the syscalls. */ /* Pick up all the syscalls. */
accept, accept,
...@@ -24,33 +24,37 @@ exit, ...@@ -24,33 +24,37 @@ exit,
fchmod, fchmod,
fchown, fchown,
fcntl, fcntl,
#ifndef hpux #if !defined(hpux) && !defined(SVR4)
flock, flock,
#endif #endif
fork, fork,
fstat, fstat,
fsync, fsync,
ftruncate, ftruncate,
#ifndef hpux #if !defined(hpux) && !defined(SVR4)
getdtablesize, getdtablesize,
#endif #endif
getegid, getegid,
geteuid, geteuid,
getgid, getgid,
getgroups, getgroups,
#ifndef SVR4
gethostid, gethostid,
#endif
gethostname, gethostname,
getitimer, getitimer,
#ifndef hpux #if !defined(hpux) && !defined(SVR4)
getpagesize, getpagesize,
#endif #endif
getpeername, getpeername,
getpgrp, getpgrp,
getpid, getpid,
getppid, getppid,
#ifndef SVR4
getpriority, getpriority,
#endif
getrlimit, getrlimit,
#ifndef hpux #if !defined(hpux) && !defined(SVR4)
getrusage, getrusage,
#endif #endif
getsockname, getsockname,
...@@ -59,7 +63,9 @@ gettimeofday, ...@@ -59,7 +63,9 @@ gettimeofday,
getuid, getuid,
ioctl, ioctl,
kill, kill,
#ifndef SVR4
killpg, killpg,
#endif
link, link,
listen, listen,
lseek, lseek,
...@@ -71,13 +77,15 @@ open, ...@@ -71,13 +77,15 @@ open,
pipe, pipe,
profil, profil,
ptrace, ptrace,
#if !defined(SUNOS) && !defined(parisc) #if !defined(SUNOS) && !defined(parisc) && !defined(SOLARIS)
quota, quota,
#endif #endif
read, read,
readlink, readlink,
readv, readv,
#ifndef SVR4
reboot, reboot,
#endif
recv, recv,
recvfrom, recvfrom,
recvmsg, recvmsg,
...@@ -89,17 +97,21 @@ send, ...@@ -89,17 +97,21 @@ send,
sendmsg, sendmsg,
sendto, sendto,
setgroups, setgroups,
#ifndef SUNOS #if !defined(SUNOS) && !defined(SOLARIS)
sethostid, sethostid,
#endif #endif
#ifndef SVR4
sethostname, sethostname,
#endif
setitimer, setitimer,
setpgrp, setpgrp,
#ifndef SVR4
setpriority, setpriority,
#if !defined(SUNOS) && !defined(parisc) #endif
#if !defined(SUNOS) && !defined(parisc) && !defined(SOLARIS)
setquota, setquota,
#endif #endif
#ifndef hpux #if !defined(hpux) && !defined(SVR4)
setregid, setregid,
setreuid, setreuid,
#endif #endif
...@@ -107,22 +119,28 @@ setrlimit, ...@@ -107,22 +119,28 @@ setrlimit,
setsockopt, setsockopt,
settimeofday, settimeofday,
shutdown, shutdown,
#ifndef SVR4
sigblock, sigblock,
#endif
sigpause, sigpause,
#if !defined(ibmrt) && !defined(hpux) #if !defined(ibmrt) && !defined(hpux) && !defined(SVR4)
sigreturn, sigreturn,
#endif #endif
#ifndef SVR4
sigsetmask, sigsetmask,
sigstack, sigstack,
sigvec, sigvec,
#endif
socket, socket,
socketpair, socketpair,
stat, stat,
#ifndef SVR4
swapon, swapon,
#endif
symlink, symlink,
sync, sync,
syscall, syscall,
#ifdef hpux #if defined(hpux) || defined(SVR4)
closedir, closedir,
opendir, opendir,
readdir, readdir,
...@@ -131,7 +149,7 @@ tcsetattr, ...@@ -131,7 +149,7 @@ tcsetattr,
#endif #endif
truncate, truncate,
umask, umask,
#if !defined(SUNOS) && !defined(parisc) #if !defined(SUNOS) && !defined(parisc) && !defined(SOLARIS)
umount, umount,
#endif #endif
unlink, unlink,
...@@ -141,7 +159,9 @@ utimes, ...@@ -141,7 +159,9 @@ utimes,
vfork, vfork,
vhangup, vhangup,
wait, wait,
#ifndef SVR4
wait3, wait3,
#endif
write, write,
writev, writev,
...@@ -182,5 +202,19 @@ gethostbyname, ...@@ -182,5 +202,19 @@ gethostbyname,
gethostbyaddr, gethostbyaddr,
/* Other random things. */ /* Other random things. */
#ifdef SVR4
setpgid,
getpgid,
timezone,
altzone,
daylight,
tzname,
dlopen,
dlsym,
dlclose,
dlerror,
#endif
#ifndef SVR4
getwd, getwd,
#endif
ttyname ttyname
/* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/vars.c,v 1.1 1992/07/28 20:15:38 wlott Exp $ */ /* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/vars.c,v 1.1.1.1 1994/10/24 19:53:01 ram Exp $ */
#include <stdio.h> #include <stdio.h>
#include <sys/types.h> #include <sys/types.h>
#include <stdlib.h> #include <stdlib.h>
#include "lisp.h" #include "lisp.h"
#include "vars.h" #include "vars.h"
#include "os.h"
#define NAME_BUCKETS 31 #define NAME_BUCKETS 31
#define OBJ_BUCKETS 31 #define OBJ_BUCKETS 31
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment