version 1.10, 2025/04/10 01:24:39
|
version 1.12, 2025/04/14 19:56:27
|
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.12 2025/04/14 19:56:27 snw |
|
* Working towards FreeBSD fix |
|
* |
|
* Revision 1.11 2025/04/13 04:22:43 snw |
|
* Fix snprintf calls |
|
* |
* Revision 1.10 2025/04/10 01:24:39 snw |
* Revision 1.10 2025/04/10 01:24:39 snw |
* Remove C++ style comments |
* Remove C++ style comments |
* |
* |
Line 160 void symtab_init (void)
|
Line 166 void symtab_init (void)
|
mbpartition = (char *) shm_alloc ((size_t) PSIZE + 2); |
mbpartition = (char *) shm_alloc ((size_t) PSIZE + 2); |
if (mbpartition != NULL) { |
if (mbpartition != NULL) { |
shm_config->hdr->use_mb_globals = TRUE; |
shm_config->hdr->use_mb_globals = TRUE; |
|
shm_config->hdr->partition = mbpartition; |
} |
} |
else { |
else { |
fprintf (stderr, "symtab_init: falling back to global-backed structured system variables\r\n"); |
fprintf (stderr, "symtab_init: falling back to global-backed structured system variables\r\n"); |
shm_config->hdr->use_mb_globals = FALSE; |
shm_config->hdr->use_mb_globals = FALSE; |
} |
} |
|
|
shm_config->hdr->partition = mbpartition; |
|
|
|
if (symtab_get_sem ()) { |
if (symtab_get_sem ()) { |
for (i = 0; i < 128; i++) shm_config->hdr->alphptr[i] = 0L; |
for (i = 0; i < 128; i++) shm_config->hdr->alphptr[i] = 0L; |
Line 181 void symtab_init (void)
|
Line 186 void symtab_init (void)
|
fprintf (stderr, "symtab_init: could not attach to symbol table semaphore\r\n"); |
fprintf (stderr, "symtab_init: could not attach to symbol table semaphore\r\n"); |
exit (1); |
exit (1); |
} |
} |
|
|
mbpartition = shm_config->hdr->partition; |
if (shm_config->hdr->use_mb_globals == TRUE) { |
|
mbpartition = shm_config->hdr->partition; |
|
} |
|
|
symtab_release_sem (); |
symtab_release_sem (); |
} |
} |
Line 391 void symtab_bltin (short action, char *k
|
Line 398 void symtab_bltin (short action, char *k
|
stcnv_m2c (tt_with); |
stcnv_m2c (tt_with); |
stcnv_m2c (tt_key); |
stcnv_m2c (tt_key); |
|
|
snprintf (key, 100, "%s%s\201\201", tt_with, tt_key); |
sprintf (key, "%s%s\201\201", tt_with, tt_key); |
|
|
|
|
no_with: |
no_with: |
Line 1917 zinvend:
|
Line 1924 zinvend:
|
|
|
char esbuf[256]; |
char esbuf[256]; |
|
|
snprintf (esbuf, 255, "%d\201", estack); |
snprintf (esbuf, sizeof (esbuf) - 1, "%d\201", estack); |
|
|
j = stcpy (newptr, esbuf); |
j = stcpy (newptr, esbuf); |
|
|