583 lines
16 KiB
C
583 lines
16 KiB
C
/* NetHack 3.6 system.h $NHDT-Date: 1550268586 2019/02/15 22:09:46 $ $NHDT-Branch: NetHack-3.6.2-beta01 $:$NHDT-Revision: 1.17 $ */
|
|
/* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
|
|
/*-Copyright (c) Robert Patrick Rankin, 2017. */
|
|
/* NetHack may be freely redistributed. See license for details. */
|
|
|
|
#ifndef SYSTEM_H
|
|
#define SYSTEM_H
|
|
|
|
#if !defined(WIN32)
|
|
#if !defined(__cplusplus) && !defined(__GO32__)
|
|
#define E extern
|
|
|
|
/* some old <sys/types.h> may not define off_t and size_t; if your system is
|
|
* one of these, define them by hand below
|
|
*/
|
|
#if (defined(VMS) && !defined(__GNUC__)) || defined(MAC)
|
|
#include <types.h>
|
|
#else
|
|
#ifndef AMIGA
|
|
#include <sys/types.h>
|
|
#endif
|
|
#endif
|
|
|
|
#if (defined(MICRO) && !defined(TOS)) || defined(ANCIENT_VAXC)
|
|
#if !defined(_SIZE_T) && !defined(__size_t) /* __size_t for CSet/2 */
|
|
#define _SIZE_T
|
|
#if !((defined(MSDOS) || defined(OS2)) \
|
|
&& defined(_SIZE_T_DEFINED)) /* MSC 5.1 */
|
|
#if !(defined(__GNUC__) && defined(AMIGA))
|
|
typedef unsigned int size_t;
|
|
#endif
|
|
#endif
|
|
#endif
|
|
#endif /* MICRO && !TOS */
|
|
|
|
#if defined(__TURBOC__) || defined(MAC)
|
|
#include <time.h> /* time_t is not in <sys/types.h> */
|
|
#endif
|
|
#if defined(ULTRIX) && !(defined(ULTRIX_PROTO) || defined(NHSTDC))
|
|
/* The Ultrix v3.0 <sys/types.h> seems to be very wrong. */
|
|
#define time_t long
|
|
#endif
|
|
|
|
#if defined(ULTRIX) || defined(VMS)
|
|
#define off_t long
|
|
#endif
|
|
#if defined(AZTEC) || defined(THINKC4) || defined(__TURBOC__)
|
|
typedef long off_t;
|
|
#endif
|
|
|
|
#endif /* !__cplusplus && !__GO32__ */
|
|
|
|
/* You may want to change this to fit your system, as this is almost
|
|
* impossible to get right automatically.
|
|
* This is the type of signal handling functions.
|
|
*/
|
|
#if !defined(OS2) && (defined(_MSC_VER) || defined(__TURBOC__) \
|
|
|| defined(__SC__) || defined(WIN32))
|
|
#define SIG_RET_TYPE void(__cdecl *)(int)
|
|
#endif
|
|
#ifndef SIG_RET_TYPE
|
|
#if defined(NHSTDC) || defined(POSIX_TYPES) || defined(OS2) || defined(__DECC)
|
|
#define SIG_RET_TYPE void (*)()
|
|
#endif
|
|
#endif
|
|
#ifndef SIG_RET_TYPE
|
|
#if defined(ULTRIX) || defined(SUNOS4) || defined(SVR3) || defined(SVR4)
|
|
/* SVR3 is defined automatically by some systems */
|
|
#define SIG_RET_TYPE void (*)()
|
|
#endif
|
|
#endif
|
|
#ifndef SIG_RET_TYPE /* BSD, SIII, SVR2 and earlier, Sun3.5 and earlier */
|
|
#define SIG_RET_TYPE int (*)()
|
|
#endif
|
|
|
|
#if !defined(__cplusplus) && !defined(__GO32__)
|
|
|
|
#if defined(BSD) || defined(ULTRIX) || defined(RANDOM)
|
|
#ifdef random
|
|
#undef random
|
|
#endif
|
|
#if !defined(__SC__) && !defined(LINUX)
|
|
E long NDECL(random);
|
|
#endif
|
|
#if (!defined(SUNOS4) && !defined(bsdi) && !defined(__FreeBSD__)) \
|
|
|| defined(RANDOM)
|
|
E void FDECL(srandom, (unsigned int));
|
|
#else
|
|
#if !defined(bsdi) && !defined(__FreeBSD__)
|
|
E int FDECL(srandom, (unsigned int));
|
|
#endif
|
|
#endif
|
|
#else
|
|
#if defined(MACOSX)
|
|
E long NDECL(lrand48);
|
|
E void FDECL(srand48, (long));
|
|
#else
|
|
E long lrand48();
|
|
E void srand48();
|
|
#endif /* MACOSX */
|
|
#endif /* BSD || ULTRIX || RANDOM */
|
|
|
|
#if !defined(BSD) || defined(ultrix)
|
|
/* real BSD wants all these to return int */
|
|
#ifndef MICRO
|
|
E void FDECL(exit, (int));
|
|
#endif /* MICRO */
|
|
/* compensate for some CSet/2 bogosities */
|
|
#if defined(OS2_CSET2) && defined(OS2_CSET2_VER_2)
|
|
#define open _open
|
|
#define close _close
|
|
#define read _read
|
|
#define write _write
|
|
#define lseek _lseek
|
|
#define chdir _chdir
|
|
#define getcwd _getcwd
|
|
#define setmode _setmode
|
|
#endif /* OS2_CSET2 && OS2_CSET2_VER_2 */
|
|
/* If flex thinks that we're not __STDC__ it declares free() to return
|
|
int and we die. We must use __STDC__ instead of NHSTDC because
|
|
the former is naturally what flex tests for. */
|
|
#if defined(__STDC__) || !defined(FLEX_SCANNER)
|
|
#ifndef OS2_CSET2
|
|
#ifndef MONITOR_HEAP
|
|
E void FDECL(free, (genericptr_t));
|
|
#endif
|
|
#endif
|
|
#endif
|
|
#if !defined(__SASC_60) && !defined(_DCC) && !defined(__SC__)
|
|
#if defined(AMIGA) && !defined(AZTEC_50) && !defined(__GNUC__)
|
|
E int FDECL(perror, (const char *));
|
|
#else
|
|
#if !(defined(ULTRIX_PROTO) && defined(__GNUC__))
|
|
E void FDECL(perror, (const char *));
|
|
#endif
|
|
#endif
|
|
#endif
|
|
#endif
|
|
#ifndef NeXT
|
|
#ifdef POSIX_TYPES
|
|
E void FDECL(qsort, (genericptr_t, size_t, size_t,
|
|
int (*)(const genericptr, const genericptr)));
|
|
#else
|
|
#if defined(BSD) || defined(ULTRIX)
|
|
E int qsort();
|
|
#else
|
|
#if !defined(LATTICE) && !defined(AZTEC_50)
|
|
E void FDECL(qsort, (genericptr_t, size_t, size_t,
|
|
int (*)(const genericptr, const genericptr)));
|
|
#endif
|
|
#endif
|
|
#endif
|
|
#endif /* NeXT */
|
|
|
|
#ifndef __SASC_60
|
|
#if !defined(AZTEC_50) && !defined(__GNUC__)
|
|
/* may already be defined */
|
|
|
|
#ifdef ULTRIX
|
|
#ifdef ULTRIX_PROTO
|
|
E int FDECL(lseek, (int, off_t, int));
|
|
#else
|
|
E long FDECL(lseek, (int, off_t, int));
|
|
#endif
|
|
/* Ultrix 3.0 man page mistakenly says it returns an int. */
|
|
E int FDECL(write, (int, char *, int));
|
|
E int FDECL(link, (const char *, const char *));
|
|
#else /*!ULTRIX*/
|
|
#if !(defined(bsdi) || defined(VMS))
|
|
E long FDECL(lseek, (int, long, int));
|
|
#if defined(POSIX_TYPES) || defined(__TURBOC__)
|
|
E int FDECL(write, (int, const void *, unsigned));
|
|
#else
|
|
#ifndef __MWERKS__ /* metrowerks defines write via universal headers */
|
|
E int FDECL(write, (int, genericptr_t, unsigned));
|
|
#endif
|
|
#endif /*?(POSIX_TYPES || __TURBOC__)*/
|
|
#endif /*!(bsdi || VMS)*/
|
|
#endif /*?ULTRIX*/
|
|
|
|
#ifdef OS2_CSET2 /* IBM CSet/2 */
|
|
#ifdef OS2_CSET2_VER_1
|
|
E int FDECL(unlink, (char *));
|
|
#else
|
|
E int FDECL(unlink, (const char *)); /* prototype is ok in ver >= 2 */
|
|
#endif
|
|
#else
|
|
#ifndef __SC__
|
|
E int FDECL(unlink, (const char *));
|
|
#endif
|
|
#endif
|
|
|
|
#endif /* AZTEC_50 && __GNUC__ */
|
|
|
|
#ifdef MAC
|
|
#ifndef __CONDITIONALMACROS__ /* universal headers */
|
|
E int FDECL(close, (int)); /* unistd.h */
|
|
E int FDECL(read, (int, char *, int)); /* unistd.h */
|
|
E int FDECL(chdir, (const char *)); /* unistd.h */
|
|
E char *FDECL(getcwd, (char *, int)); /* unistd.h */
|
|
#endif
|
|
|
|
E int FDECL(open, (const char *, int));
|
|
#endif
|
|
|
|
#if defined(MICRO)
|
|
E int FDECL(close, (int));
|
|
#ifndef __EMX__
|
|
E int FDECL(read, (int, genericptr_t, unsigned int));
|
|
#endif
|
|
E int FDECL(open, (const char *, int, ...));
|
|
E int FDECL(dup2, (int, int));
|
|
E int FDECL(setmode, (int, int));
|
|
E int NDECL(kbhit);
|
|
#if !defined(_DCC)
|
|
#if defined(__TURBOC__)
|
|
E int FDECL(chdir, (const char *));
|
|
#else
|
|
#ifndef __EMX__
|
|
E int FDECL(chdir, (char *));
|
|
#endif
|
|
#endif
|
|
#ifndef __EMX__
|
|
E char *FDECL(getcwd, (char *, int));
|
|
#endif
|
|
#endif /* !_DCC */
|
|
#endif
|
|
|
|
#ifdef ULTRIX
|
|
E int FDECL(close, (int));
|
|
E int FDECL(atoi, (const char *));
|
|
E long FDECL(atol, (const char *));
|
|
E int FDECL(chdir, (const char *));
|
|
#if !defined(ULTRIX_CC20) && !defined(__GNUC__)
|
|
E int FDECL(chmod, (const char *, int));
|
|
E mode_t FDECL(umask, (int));
|
|
#endif
|
|
E int FDECL(read, (int, genericptr_t, unsigned));
|
|
/* these aren't quite right, but this saves including lots of system files */
|
|
E int FDECL(stty, (int, genericptr_t));
|
|
E int FDECL(gtty, (int, genericptr_t));
|
|
E int FDECL(ioctl, (int, int, char *));
|
|
E int FDECL(isatty, (int)); /* 1==yes, 0==no, -1==error */
|
|
#include <sys/file.h>
|
|
#if defined(ULTRIX_PROTO) || defined(__GNUC__)
|
|
E int NDECL(fork);
|
|
#else
|
|
E long NDECL(fork);
|
|
#endif
|
|
#endif /* ULTRIX */
|
|
|
|
#ifdef VMS
|
|
#ifndef abs
|
|
E int FDECL(abs, (int));
|
|
#endif
|
|
E int FDECL(atexit, (void (*)(void)));
|
|
E int FDECL(atoi, (const char *));
|
|
E long FDECL(atol, (const char *));
|
|
E int FDECL(chdir, (const char *));
|
|
E int FDECL(chown, (const char *, unsigned, unsigned));
|
|
#ifdef __DECC_VER
|
|
E int FDECL(chmod, (const char *, mode_t));
|
|
E mode_t FDECL(umask, (mode_t));
|
|
#else
|
|
E int FDECL(chmod, (const char *, int));
|
|
E int FDECL(umask, (int));
|
|
#endif
|
|
/* #include <unixio.h> */
|
|
E int FDECL(close, (int));
|
|
E int VDECL(creat, (const char *, unsigned, ...));
|
|
E int FDECL(delete, (const char *));
|
|
E int FDECL(fstat, (/*_ int, stat_t * _*/));
|
|
E int FDECL(isatty, (int)); /* 1==yes, 0==no, -1==error */
|
|
E off_t FDECL(lseek, (int, off_t, int));
|
|
E int VDECL(open, (const char *, int, unsigned, ...));
|
|
E int FDECL(read, (int, genericptr_t, unsigned));
|
|
E int FDECL(rename, (const char *, const char *));
|
|
E int FDECL(stat, (/*_ const char *,stat_t * _*/));
|
|
E int FDECL(write, (int, const genericptr, unsigned));
|
|
#endif
|
|
|
|
#endif /* __SASC_60 */
|
|
|
|
/* both old & new versions of Ultrix want these, but real BSD does not */
|
|
#ifdef ultrix
|
|
E void abort();
|
|
E void bcopy();
|
|
#ifdef ULTRIX
|
|
E int FDECL(system, (const char *));
|
|
#ifndef _UNISTD_H_
|
|
E int FDECL(execl, (const char *, ...));
|
|
#endif
|
|
#endif
|
|
#endif
|
|
#ifdef MICRO
|
|
E void NDECL(abort);
|
|
E void FDECL(_exit, (int));
|
|
E int FDECL(system, (const char *));
|
|
#endif
|
|
#if defined(HPUX) && !defined(_POSIX_SOURCE)
|
|
E long NDECL(fork);
|
|
#endif
|
|
|
|
#ifdef POSIX_TYPES
|
|
/* The POSIX string.h is required to define all the mem* and str* functions */
|
|
#include <string.h>
|
|
#else
|
|
#if defined(SYSV) || defined(VMS) || defined(MAC) || defined(SUNOS4)
|
|
#if defined(NHSTDC) || (defined(VMS) && !defined(ANCIENT_VAXC))
|
|
#if !defined(_AIX32) && !(defined(SUNOS4) && defined(__STDC__))
|
|
/* Solaris unbundled cc (acc) */
|
|
E int FDECL(memcmp, (const void *, const void *, size_t));
|
|
E void *FDECL(memcpy, (void *, const void *, size_t));
|
|
E void *FDECL(memset, (void *, int, size_t));
|
|
#endif
|
|
#else
|
|
#ifndef memcmp /* some systems seem to macro these back to b*() */
|
|
E int memcmp();
|
|
#endif
|
|
#ifndef memcpy
|
|
E char *memcpy();
|
|
#endif
|
|
#ifndef memset
|
|
E char *memset();
|
|
#endif
|
|
#endif
|
|
#else
|
|
#ifdef HPUX
|
|
E int FDECL(memcmp, (char *, char *, int));
|
|
E void *FDECL(memcpy, (char *, char *, int));
|
|
E void *FDECL(memset, (char *, int, int));
|
|
#endif
|
|
#endif
|
|
#endif /* POSIX_TYPES */
|
|
|
|
#if defined(MICRO) && !defined(LATTICE)
|
|
#if defined(TOS) && defined(__GNUC__)
|
|
E int FDECL(memcmp, (const void *, const void *, size_t));
|
|
E void *FDECL(memcpy, (void *, const void *, size_t));
|
|
E void *FDECL(memset, (void *, int, size_t));
|
|
#else
|
|
#if defined(AZTEC_50) || defined(NHSTDC))
|
|
E int FDECL(memcmp, (const void *, const void *, size_t));
|
|
E void *FDECL(memcpy, (void *, const void *, size_t));
|
|
E void *FDECL(memset, (void *, int, size_t));
|
|
#else
|
|
E int FDECL(memcmp, (char *, char *, unsigned int));
|
|
E char *FDECL(memcpy, (char *, char *, unsigned int));
|
|
E char *FDECL(memset, (char *, int, int));
|
|
#endif /* AZTEC_50 || NHSTDC */
|
|
#endif /* TOS */
|
|
#endif /* MICRO */
|
|
|
|
#if defined(BSD) && defined(ultrix) /* i.e., old versions of Ultrix */
|
|
E void sleep();
|
|
#endif
|
|
#if defined(ULTRIX) || defined(SYSV)
|
|
E unsigned sleep();
|
|
#endif
|
|
#if defined(HPUX)
|
|
E unsigned int FDECL(sleep, (unsigned int));
|
|
#endif
|
|
#ifdef VMS
|
|
E int FDECL(sleep, (unsigned));
|
|
#endif
|
|
|
|
E char *FDECL(getenv, (const char *));
|
|
E char *getlogin();
|
|
#if defined(HPUX) && !defined(_POSIX_SOURCE)
|
|
E long NDECL(getuid);
|
|
E long NDECL(getgid);
|
|
E long NDECL(getpid);
|
|
#else
|
|
#ifdef POSIX_TYPES
|
|
E pid_t NDECL(getpid);
|
|
E uid_t NDECL(getuid);
|
|
E gid_t NDECL(getgid);
|
|
#ifdef VMS
|
|
E pid_t NDECL(getppid);
|
|
#endif
|
|
#else /*!POSIX_TYPES*/
|
|
#ifndef getpid /* Borland C defines getpid() as a macro */
|
|
E int NDECL(getpid);
|
|
#endif
|
|
#ifdef VMS
|
|
E int NDECL(getppid);
|
|
E unsigned NDECL(getuid);
|
|
E unsigned NDECL(getgid);
|
|
#endif
|
|
#if defined(ULTRIX) && !defined(_UNISTD_H_)
|
|
E unsigned NDECL(getuid);
|
|
E unsigned NDECL(getgid);
|
|
E int FDECL(setgid, (int));
|
|
E int FDECL(setuid, (int));
|
|
#endif
|
|
#endif /*?POSIX_TYPES*/
|
|
#endif /*?(HPUX && !_POSIX_SOURCE)*/
|
|
|
|
/* add more architectures as needed */
|
|
#if defined(HPUX)
|
|
#define seteuid(x) setreuid(-1, (x));
|
|
#endif
|
|
|
|
/*# string(s).h #*/
|
|
#if !defined(_XtIntrinsic_h) && !defined(POSIX_TYPES)
|
|
/* <X11/Intrinsic.h> #includes <string[s].h>; so does defining POSIX_TYPES */
|
|
|
|
#if (defined(ULTRIX) || defined(NeXT)) && defined(__GNUC__)
|
|
#include <strings.h>
|
|
#else
|
|
E char *FDECL(strcpy, (char *, const char *));
|
|
E char *FDECL(strncpy, (char *, const char *, size_t));
|
|
E char *FDECL(strcat, (char *, const char *));
|
|
E char *FDECL(strncat, (char *, const char *, size_t));
|
|
E char *FDECL(strpbrk, (const char *, const char *));
|
|
|
|
#if defined(SYSV) || defined(MICRO) || defined(MAC) || defined(VMS) \
|
|
|| defined(HPUX)
|
|
E char *FDECL(strchr, (const char *, int));
|
|
E char *FDECL(strrchr, (const char *, int));
|
|
#else /* BSD */
|
|
E char *FDECL(index, (const char *, int));
|
|
E char *FDECL(rindex, (const char *, int));
|
|
#endif
|
|
|
|
E int FDECL(strcmp, (const char *, const char *));
|
|
E int FDECL(strncmp, (const char *, const char *, size_t));
|
|
#if defined(MICRO) || defined(MAC) || defined(VMS)
|
|
E size_t FDECL(strlen, (const char *));
|
|
#else
|
|
#ifdef HPUX
|
|
E unsigned int FDECL(strlen, (char *));
|
|
#else
|
|
#if !(defined(ULTRIX_PROTO) && defined(__GNUC__))
|
|
E int FDECL(strlen, (const char *));
|
|
#endif
|
|
#endif /* HPUX */
|
|
#endif /* MICRO */
|
|
#endif /* ULTRIX */
|
|
|
|
#endif /* !_XtIntrinsic_h_ && !POSIX_TYPES */
|
|
|
|
#if defined(ULTRIX) && defined(__GNUC__)
|
|
E char *FDECL(index, (const char *, int));
|
|
E char *FDECL(rindex, (const char *, int));
|
|
#endif
|
|
|
|
/* Old varieties of BSD have char *sprintf().
|
|
* Newer varieties of BSD have int sprintf() but allow for the old char *.
|
|
* Several varieties of SYSV and PC systems also have int sprintf().
|
|
* If your system doesn't agree with this breakdown, you may want to change
|
|
* this declaration, especially if your machine treats the types differently.
|
|
* If your system defines sprintf, et al, in stdio.h, add to the initial
|
|
* #if.
|
|
*/
|
|
#if defined(ULTRIX) || defined(__DECC) || defined(__SASC_60)
|
|
#define SPRINTF_PROTO
|
|
#endif
|
|
#if (defined(SUNOS4) && defined(__STDC__)) || defined(_AIX32)
|
|
#define SPRINTF_PROTO
|
|
#endif
|
|
#if defined(TOS) || defined(AZTEC_50) || defined(__sgi) || defined(__GNUC__)
|
|
/* problem with prototype mismatches */
|
|
#define SPRINTF_PROTO
|
|
#endif
|
|
#if defined(__MWERKS__) || defined(__SC__)
|
|
/* Metrowerks already has a prototype for sprintf() */
|
|
#define SPRINTF_PROTO
|
|
#endif
|
|
|
|
#ifndef SPRINTF_PROTO
|
|
#if defined(POSIX_TYPES) || defined(DGUX) || defined(NeXT) || !defined(BSD)
|
|
E int FDECL(sprintf, (char *, const char *, ...));
|
|
#else
|
|
#define OLD_SPRINTF
|
|
E char *sprintf();
|
|
#endif
|
|
#endif
|
|
#ifdef SPRINTF_PROTO
|
|
#undef SPRINTF_PROTO
|
|
#endif
|
|
|
|
#ifndef __SASC_60
|
|
#ifdef NEED_VARARGS
|
|
#if defined(USE_STDARG) || defined(USE_VARARGS)
|
|
#if !defined(SVR4) && !defined(apollo)
|
|
#if !(defined(ULTRIX_PROTO) && defined(__GNUC__))
|
|
#if !(defined(SUNOS4) && defined(__STDC__)) /* Solaris unbundled cc (acc) */
|
|
E int FDECL(vsprintf, (char *, const char *, va_list));
|
|
E int FDECL(vfprintf, (FILE *, const char *, va_list));
|
|
E int FDECL(vprintf, (const char *, va_list));
|
|
#endif
|
|
#endif
|
|
#endif
|
|
#else
|
|
#ifdef vprintf
|
|
#undef vprintf
|
|
#endif
|
|
#define vprintf printf
|
|
#ifdef vfprintf
|
|
#undef vfprintf
|
|
#endif
|
|
#define vfprintf fprintf
|
|
#ifdef vsprintf
|
|
#undef vsprintf
|
|
#endif
|
|
#define vsprintf sprintf
|
|
#endif
|
|
#endif /* NEED_VARARGS */
|
|
#endif
|
|
|
|
#ifdef MICRO
|
|
E int FDECL(tgetent, (const char *, const char *));
|
|
E void FDECL(tputs, (const char *, int, int (*)()));
|
|
E int FDECL(tgetnum, (const char *));
|
|
E int FDECL(tgetflag, (const char *));
|
|
E char *FDECL(tgetstr, (const char *, char **));
|
|
E char *FDECL(tgoto, (const char *, int, int));
|
|
#else
|
|
#if !(defined(HPUX) && defined(_POSIX_SOURCE))
|
|
E int FDECL(tgetent, (char *, const char *));
|
|
E void FDECL(tputs, (const char *, int, int (*)()));
|
|
#endif
|
|
E int FDECL(tgetnum, (const char *));
|
|
E int FDECL(tgetflag, (const char *));
|
|
E char *FDECL(tgetstr, (const char *, char **));
|
|
E char *FDECL(tgoto, (const char *, int, int));
|
|
#endif
|
|
|
|
#if defined(ALLOC_C) || defined(MAKEDEFS_C)
|
|
E genericptr_t FDECL(malloc, (size_t));
|
|
E genericptr_t FDECL(realloc, (genericptr_t, size_t));
|
|
#endif
|
|
|
|
/* time functions */
|
|
|
|
#ifndef LATTICE
|
|
#if !(defined(ULTRIX_PROTO) && defined(__GNUC__))
|
|
E struct tm *FDECL(localtime, (const time_t *));
|
|
#endif
|
|
#endif
|
|
|
|
#if defined(ULTRIX) || (defined(BSD) && defined(POSIX_TYPES)) \
|
|
|| defined(SYSV) || defined(MICRO) || defined(VMS) || defined(MAC) \
|
|
|| (defined(HPUX) && defined(_POSIX_SOURCE))
|
|
E time_t FDECL(time, (time_t *));
|
|
#else
|
|
E long FDECL(time, (time_t *));
|
|
#endif /* ULTRIX */
|
|
|
|
#ifdef VMS
|
|
/* used in makedefs.c, but missing from gcc-vms's <time.h> */
|
|
E char *FDECL(ctime, (const time_t *));
|
|
#endif
|
|
|
|
#ifdef MICRO
|
|
#ifdef abs
|
|
#undef abs
|
|
#endif
|
|
E int FDECL(abs, (int));
|
|
#ifdef atoi
|
|
#undef atoi
|
|
#endif
|
|
E int FDECL(atoi, (const char *));
|
|
#endif
|
|
|
|
#undef E
|
|
|
|
#endif /* !__cplusplus && !__GO32__ */
|
|
#endif /* WIN32 */
|
|
|
|
#include "lua.h"
|
|
#include "lualib.h"
|
|
#include "lauxlib.h"
|
|
|
|
#if defined(WIN32)
|
|
#define LUA_INTCAST(i) ((int) i)
|
|
#else
|
|
#define LUA_INTCAST(i) (i)
|
|
#endif
|
|
|
|
#endif /* SYSTEM_H */
|