version 1.7, 2025/04/04 19:43:18
|
version 1.11, 2025/04/30 17:19:16
|
Line 24
|
Line 24
|
* along with FreeM. If not, see <https://www.gnu.org/licenses/>. |
* along with FreeM. If not, see <https://www.gnu.org/licenses/>. |
* |
* |
* $Log$ |
* $Log$ |
|
* Revision 1.11 2025/04/30 17:19:16 snw |
|
* Improve backtraces in debugger |
|
* |
|
* Revision 1.10 2025/04/28 19:38:55 snw |
|
* Add trace mode |
|
* |
|
* Revision 1.9 2025/04/13 04:22:43 snw |
|
* Fix snprintf calls |
|
* |
|
* Revision 1.8 2025/04/10 01:24:38 snw |
|
* Remove C++ style comments |
|
* |
* Revision 1.7 2025/04/04 19:43:18 snw |
* Revision 1.7 2025/04/04 19:43:18 snw |
* Switch to using environment catalog to determine user and group for environment, and remove -u and -g flags from freem |
* Switch to using environment catalog to determine user and group for environment, and remove -u and -g flags from freem |
* |
* |
Line 385 extern short direct_mode;
|
Line 397 extern short direct_mode;
|
extern short loadsw; /* flag to avoid redundant loads */ |
extern short loadsw; /* flag to avoid redundant loads */ |
extern short extr_types[NESTLEVLS + 1]; /* return types of extrinsic functions */ |
extern short extr_types[NESTLEVLS + 1]; /* return types of extrinsic functions */ |
|
|
extern char destructors[10][50]; |
extern char destructors[10][OBJ_DSTRSIZE]; |
extern int destructor_ct; |
extern int destructor_ct; |
extern char private_keys[MAX_PRIVATE_KEYS][255]; |
extern char private_keys[MAX_PRIVATE_KEYS][255]; |
|
|
Line 404 extern short timeoutms;
|
Line 416 extern short timeoutms;
|
extern char tmp4[80]; |
extern char tmp4[80]; |
extern short param; /* parameter count */ |
extern short param; /* parameter count */ |
extern short paramx; /* current parameter */ |
extern short paramx; /* current parameter */ |
//extern char *calloc (); |
|
extern short level; /* level count */ |
extern short level; /* level count */ |
extern short nestlt[NESTLEVLS + 1]; /* stack $T / stack levelcount */ |
extern short nestlt[NESTLEVLS + 1]; /* stack $T / stack levelcount */ |
extern pid_t pid; /* $J = process ID */ |
extern pid_t pid; /* $J = process ID */ |
Line 423 extern int strict_mode;
|
Line 434 extern int strict_mode;
|
extern short first_process; |
extern short first_process; |
extern size_t shm_init_size; |
extern size_t shm_init_size; |
extern short inrpt_after_async; |
extern short inrpt_after_async; |
|
extern int trace_mode; |
//#ifndef OLDUNIX |
extern short debug_mode; |
// extern struct sigaction act; /* signals stuff */ |
extern short lasterr[NESTLEVLS + 1]; |
//#endif /* OLDUNIX */ |
|
|
|
/* Macros */ |
/* Macros */ |
/* Create a new variable of type (datatype) with space for qty instances */ |
/* Create a new variable of type (datatype) with space for qty instances */ |
#define NEW(datatype,qty) ((datatype *)calloc(qty,sizeof(datatype))) |
#define NEW(datatype,qty) ((datatype *)calloc(qty,sizeof(datatype))) |