mirror of
https://forge.sourceware.org/marek/gcc.git
synced 2026-02-22 03:47:02 -05:00
f2cdddef40
Add the procedure `posixexit'. gcc/algol68/ChangeLog: * a68-low-posix.cc (a68_posix_setexitstatus): Delete function. (a68_posix_exit): New function. * a68-low-prelude.cc (a68_lower_setexitstatus): Delete function. (a68_lower_posixexit): New function. * a68-low-runtime.def (SET_EXIT_STATUS): Delete definition. (POSIX_EXIT): Add definition for posixexit. * a68-parser-prelude.cc (posix_prelude): Remove setexitstatus identifier from and add posixexit identifier to standenv. * a68.h (a68_posix_setexitstatus): Delete prototype. (a68_lower_setexitstatus): Likewise. (a68_posix_exit): New prototype. (a68_lower_posixexit): Likewise. * ga68.texi: libga68/ChangeLog: * ga68-posix.c (_libga68_posixexit): New function. * ga68.h (_libga68_posixexit): New prototype. (_libga68_set_exit_status): Delete prototype. * ga68.map: Remove _libga68_set_exit_status from and add _libga68_posixexit to the global map. * libga68.c: include <stdlib.h>. (_libga68_set_exit_status): Delete function. (main): Return EXIT_SUCCESS. gcc/testsuite/ChangeLog: * algol68/execute/posix-exit-1.a68: New test. Signed-off-by: Pietro Monteiro <pietro@sociotechnical.xyz>
42 lines
946 B
Plaintext
42 lines
946 B
Plaintext
LIBGA68_2.0 {
|
|
global:
|
|
_libga68_assert;
|
|
_libga68_bitsboundserror;
|
|
_libga68_bounds;
|
|
_libga68_bounds_mismatch;
|
|
_libga68_derefnil;
|
|
_libga68_dim;
|
|
_libga68_invalidcharerror;
|
|
_libga68_longlongrandom;
|
|
_libga68_longrandom;
|
|
_libga68_lower_bound;
|
|
_libga68_malloc;
|
|
_libga68_posixargc;
|
|
_libga68_posixargv;
|
|
_libga68_posixclose;
|
|
_libga68_posixcreat;
|
|
_libga68_posixerrno;
|
|
_libga68_posixexit;
|
|
_libga68_posixfconnect;
|
|
_libga68_posixfgetc;
|
|
_libga68_posixfgets;
|
|
_libga68_posixfopen;
|
|
_libga68_posixfputc;
|
|
_libga68_posixfputs;
|
|
_libga68_posixfsize;
|
|
_libga68_posixgetchar;
|
|
_libga68_posixgetenv;
|
|
_libga68_posixgets;
|
|
_libga68_posixlseek;
|
|
_libga68_posixperror;
|
|
_libga68_posixputchar;
|
|
_libga68_posixputs;
|
|
_libga68_posixstrerror;
|
|
_libga68_random;
|
|
_libga68_u32_cmp2;
|
|
_libga68_unreachable;
|
|
_libga68_upper_bound;
|
|
local:
|
|
*;
|
|
};
|