Mercurial > emacs
changeset 10406:e656e5fe190d
(unexec): Cast value of sbrk.
(run_time_remap): Cast arg to brk.
(brk_value): Renamed from Brk.
(is_it): Cast 1st arg of mmap.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 12 Jan 1995 21:02:30 +0000 |
| parents | 609f34c0c7bc |
| children | 8b26137996f9 |
| files | src/unexsunos4.c |
| diffstat | 1 files changed, 12 insertions(+), 13 deletions(-) [+] |
line wrap: on
line diff
--- a/src/unexsunos4.c Thu Jan 12 21:01:31 1995 +0000 +++ b/src/unexsunos4.c Thu Jan 12 21:02:30 1995 +0000 @@ -92,7 +92,7 @@ #endif extern char *getenv (); -static unsigned Brk; +static unsigned brk_value; static struct exec nhdr; static int rd_only_len; static long cookie; @@ -145,7 +145,8 @@ */ cookie = time (0); - Brk = sbrk (0); /* Save the break, it is reset to &_end (by ld.so?) */ + /* Save the break, it is reset to &_end (by ld.so?). */ + brk_value = (unsigned) sbrk (0); /* * Round up data start to a page boundary (Lose if not a 2 power!) @@ -163,15 +164,13 @@ initialized = 1; #endif - /* - * Handle new data and bss sizes and optional new entry point. - * No one actually uses bss_start and entry, but tradition compels - * one to support them. - * Could complain if bss_start > Brk, but the caller is *supposed* to know - * what she is doing. - */ - nhdr.a_data = (bss_start ? bss_start : Brk) - N_DATADDR (nhdr); - nhdr.a_bss = bss_start ? Brk - bss_start : 0; + /* Handle new data and bss sizes and optional new entry point. + No one actually uses bss_start and entry, but tradition compels + one to support them. + Could complain if bss_start > brk_value, + but the caller is *supposed* to know what she is doing. */ + nhdr.a_data = (bss_start ? bss_start : brk_value) - N_DATADDR (nhdr); + nhdr.a_bss = bss_start ? brk_value - bss_start : 0; if (entry) nhdr.a_entry = entry; @@ -279,7 +278,7 @@ return; /* Restore the break */ - brk (Brk); + brk ((char *) brk_value); /* If nothing to remap: we are done! */ if (rd_only_len == 0) @@ -358,7 +357,7 @@ * should the shared library decide to indirect through * addresses in the data segment not part of __DYNAMIC */ - mmap (data_start, rd_only_len, PROT_READ | PROT_EXEC, + mmap ((char *) data_start, rd_only_len, PROT_READ | PROT_EXEC, MAP_FILE | MAP_SHARED | MAP_FIXED, fd, N_DATOFF (hdr) + data_start - N_DATADDR (hdr)); close (fd);