]>
code.delx.au - gnu-emacs/blob - src/mem-limits.h
1 /* Includes for memory limit warnings.
2 Copyright (C) 1990, 1993 Free Software Foundation, Inc.
4 This file is part of GNU Emacs.
6 GNU Emacs is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2, or (at your option)
11 GNU Emacs is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with GNU Emacs; see the file COPYING. If not, write to
18 the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
22 #include <sys/resource.h>
26 #if defined(__osf__) && (defined(__mips) || defined(mips))
28 #include <sys/resource.h>
37 #include <sys/vlimit.h>
41 #include <sys/resource.h>
47 /* The important properties of this type are that 1) it's a pointer, and
48 2) arithmetic on it should work as if the size of the object pointed
49 to has a size of 1. */
51 typedef void *POINTER
;
53 typedef char *POINTER
;
56 typedef unsigned long SIZE
;
61 #define NULL ((POINTER) 0)
63 extern POINTER
start_of_data ();
65 #define EXCEEDS_LISP_PTR(ptr) \
66 (((unsigned int) (ptr) & ~DATA_SEG_BITS) >> VALBITS)
68 #define EXCEEDS_LISP_PTR(ptr) ((unsigned int) (ptr) >> VALBITS)
74 #define start_of_data() &etext
80 #define start_of_data() &etext
81 #endif /* Not emacs */
85 /* start of data space; can be changed by calling malloc_init */
86 static POINTER data_space_start
;
88 /* Number of bytes of writable memory we can expect to be able to get */
89 static unsigned int lim_data
;
96 extern long ulimit ();
100 /* Use the ulimit call, if we seem to have it. */
101 #if !defined (ULIMIT_BREAK_VALUE) || defined (LINUX)
102 lim_data
= ulimit (3, 0);
105 /* If that didn't work, just use the macro's value. */
106 #ifdef ULIMIT_BREAK_VALUE
108 lim_data
= ULIMIT_BREAK_VALUE
;
111 lim_data
-= (long) data_space_start
;
115 #if !defined(BSD4_2) && !defined(__osf__)
120 lim_data
= vlimit (LIM_DATA
, -1);
128 struct rlimit XXrlimit
;
130 getrlimit (RLIMIT_DATA
, &XXrlimit
);
132 lim_data
= XXrlimit
.rlim_cur
& RLIM_INFINITY
; /* soft limit */
134 lim_data
= XXrlimit
.rlim_cur
; /* soft limit */