home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
plbin.zip
/
pl
/
src
/
pl-main.h
< prev
next >
Wrap
C/C++ Source or Header
|
1992-07-07
|
3KB
|
110 lines
/* pl-main.h,v 1.3 1992/07/07 08:25:39 jan Exp
Copyright (c) 1990 Jan Wielemaker. All rights reserved.
See ../LICENCE to find out about your rights.
jan@swi.psy.uva.nl
Purpose: System dependent parameters
*/
GLOBAL int mainArgc; /* arguments to main() */
GLOBAL char ** mainArgv;
GLOBAL char ** mainEnv;
GLOBAL void (*PL_foreign_reinit_function) P((int argc, char **argv));
/********************************
* STRUCTURES *
********************************/
GLOBAL struct
{ char *state; /* system's boot file */
char *startup; /* default user startup file */
char *version; /* version of this prolog */
int local; /* default local stack size (K) */
int global; /* default global stack size (K) */
int trail; /* default trail stack size (K) */
int argument; /* default argument stack size (K) */
int lock; /* foreign code locks (K) */
char *goal; /* default initialisation goal */
char *toplevel; /* default top level goal */
bool notty; /* use tty? */
char *machine; /* machine we are using */
char *operating_system; /* operating system it is running */
char *home; /* systems home directory */
} systemDefaults;
GLOBAL struct options
{ long localSize; /* size of local stack */
long globalSize; /* size of global stack */
long trailSize; /* size of trail stack */
long argumentSize; /* size of argument stack */
long lockSize; /* size of lock stack */
char * goal; /* initial goal */
char * topLevel; /* toplevel goal */
char * initFile; /* initialisation file */
char * compileOut; /* file to store compiler output */
} options;
GLOBAL struct
{ bool boot; /* boot cycle */
bool extendMode; /* extend using ^[ and ^D */
bool doExtend; /* currently using extend mode ? */
bool beep; /* beep if extend fails */
int debugLevel; /* internal debuglevel (0-9) */
bool dumped; /* created from a dump? */
bool notty; /* do not use ioctl() calls */
bool optimise; /* use optimised compiler */
int arithmetic; /* inside arithmetic code ? */
bool io_initialised; /* I/O initoalisation has finished */
bool initialised; /* Initialisation completed */
} status;
/********************************
* PARAMETERS *
********************************/
#ifndef DEFSTARTUP
#define DEFSTARTUP .plrc
#endif
#ifndef SYSTEMHOME
#define SYSTEMHOME /usr/local/lib/pl
#endif
#ifndef MACHINE
#define MACHINE "unknown"
#endif
#ifndef OPERATING_SYSTEM
#define OPERATING_SYSTEM "unknown"
#endif
#if O_CAN_MAP || O_SHARED_MEMORY
#define DEF_DEFLOCAL 2000
#define DEF_DEFGLOBAL 4000
#define DEF_DEFTRAIL 4000
#define DEF_DEFARGUMENT 8
#define DEF_DEFLOCK 8
#else
#define DEF_DEFLOCAL 200
#define DEF_DEFGLOBAL 200
#define DEF_DEFTRAIL 200
#define DEF_DEFARGUMENT 5
#define DEF_DEFLOCK 5
#endif
#ifndef DEFLOCAL
#define DEFLOCAL DEF_DEFLOCAL
#endif
#ifndef DEFGLOBAL
#define DEFGLOBAL DEF_DEFGLOBAL
#endif
#ifndef DEFTRAIL
#define DEFTRAIL DEF_DEFTRAIL
#endif
#ifndef DEFARGUMENT
#define DEFARGUMENT DEF_DEFARGUMENT
#endif
#ifndef DEFLOCK
#define DEFLOCK DEF_DEFLOCK
#endif