--- freem/src/frmgbl.c 2025/04/17 14:34:27 1.13 +++ freem/src/frmgbl.c 2025/05/18 18:15:38 1.20 @@ -1,5 +1,5 @@ /* - * $Id: frmgbl.c,v 1.13 2025/04/17 14:34:27 snw Exp $ + * $Id: frmgbl.c,v 1.20 2025/05/18 18:15:38 snw Exp $ * freem global C variables * * @@ -24,6 +24,27 @@ * along with FreeM. If not, see . * * $Log: frmgbl.c,v $ + * Revision 1.20 2025/05/18 18:15:38 snw + * Add ZEDIT command for editing routines + * + * Revision 1.19 2025/05/16 13:22:58 snw + * Bump version to account for shared memory changes + * + * Revision 1.18 2025/05/16 04:42:02 snw + * Fix macOS port + * + * Revision 1.17 2025/05/05 04:46:35 snw + * Documentation fixes; make FreeM more standards compliant + * + * Revision 1.16 2025/04/30 17:19:16 snw + * Improve backtraces in debugger + * + * Revision 1.15 2025/04/30 14:41:03 snw + * Further debugger work + * + * Revision 1.14 2025/04/28 19:38:55 snw + * Add trace mode + * * Revision 1.13 2025/04/17 14:34:27 snw * Further logging improvements * @@ -546,8 +567,8 @@ char curdir[256] = "."; /* curre char startuprou[PATHLEN] = "\201"; /* start up routine from cmdline*/ char zcommds[256] = -" za zas zb zd zg zh zi zj zl zn zp zq zr zs zt zwr zbreak \ -zgo zhalt zinsert zjob zload znamespace zprint zquit zremove zsave ztrap zwrite \201"; /* intrinsic z-commands */ +" za zb zc ze zg zh zi zj zl zm zn zp zq zr zs zth ztr zwa zwi zwr zassert zbreak \ +zconst zedit zgo zhalt zinsert zjob zload zmap znamespace zprint zquit zremove zsave zthrow ztrap zunmap zwatch zwith zwrite \201"; /* intrinsic z-commands */ char zfunctions[256] = /* intrinsic z-functions */ " zb zc zd ze zh zht zk zl zm zn zo zp zr zs zt zboolean zcall zcr zcrc zdata zdate zedit zhorolog \ zkey zlength zlsd zname znext zorder zpiece zprevious zreplace zsyntax zsort ztime \201"; @@ -656,12 +677,14 @@ short ipc_pending = 0; /* 1 if an inco int strict_mode = 0; +int trace_mode = 0; +short debug_mode = FALSE; +int lasterr[NESTLEVLS + 1]; + short first_process = FALSE; -#if defined(__FreeBSD__) - size_t shm_init_size = 4194304; -#else - size_t shm_init_size = 16777216; -#endif +size_t shm_init_size = 16777216; /* initial size of SysV shared memory segment (16M + overhead); + requires a kernel shmmax (or equivalent) parameter of at least + 17002496 */ short inrpt_after_async = FALSE; void unnew (void)