Mercurial > emacs
annotate src/mem-limits.h @ 1537:8531c6d96e5c
(make-directory): Renamed from make-directory-path.
Optional argument says whether to create parent dirs.
Invoke file-name handler here.
(after-find-file): Delete code that offers to create dir.
Instead, just print a message.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 03 Nov 1992 07:07:02 +0000 |
parents | a321ed0fa3ae |
children | 613783a3f00c |
rev | line source |
---|---|
486 | 1 /* Includes for memory limit warnings. |
575 | 2 Copyright (C) 1990, 1992 Free Software Foundation, Inc. |
486 | 3 |
4 This file is part of GNU Emacs. | |
5 | |
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 1, or (at your option) | |
9 any later version. | |
10 | |
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. | |
15 | |
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. */ | |
19 | |
20 #ifndef BSD4_2 | |
21 #ifndef USG | |
22 #include <sys/vlimit.h> | |
23 #endif /* not USG */ | |
24 #else /* if BSD4_2 */ | |
25 #include <sys/time.h> | |
26 #include <sys/resource.h> | |
27 #endif /* BSD4_2 */ | |
28 | |
1393
d2ae5897e43c
[!emacs]: Don't define POINTER, SIZE or NULL.
Richard M. Stallman <rms@gnu.org>
parents:
734
diff
changeset
|
29 #ifdef emacs |
575 | 30 /* The important properties of this type are that 1) it's a pointer, and |
31 2) arithmetic on it should work as if the size of the object pointed | |
32 to has a size of 1. */ | |
486 | 33 #ifdef __STDC__ |
34 typedef void *POINTER; | |
35 #else | |
36 typedef char *POINTER; | |
37 #endif | |
38 | |
39 typedef unsigned long SIZE; | |
40 | |
41 #ifdef NULL | |
42 #undef NULL | |
43 #endif | |
44 #define NULL ((POINTER) 0) | |
45 | |
46 extern POINTER start_of_data (); | |
1393
d2ae5897e43c
[!emacs]: Don't define POINTER, SIZE or NULL.
Richard M. Stallman <rms@gnu.org>
parents:
734
diff
changeset
|
47 #define EXCEEDS_LISP_PTR(ptr) ((unsigned int) (ptr) >> VALBITS) |
486 | 48 |
49 #ifdef BSD | |
50 #ifndef DATA_SEG_BITS | |
734 | 51 extern char etext; |
486 | 52 #define start_of_data() &etext |
53 #endif | |
54 #endif | |
55 | |
56 #else /* Not emacs */ | |
734 | 57 extern char etext; |
486 | 58 #define start_of_data() &etext |
59 #endif /* Not emacs */ | |
60 | |
61 | |
62 | |
63 /* start of data space; can be changed by calling malloc_init */ | |
64 static POINTER data_space_start; | |
65 | |
66 /* Number of bytes of writable memory we can expect to be able to get */ | |
67 static unsigned int lim_data; | |
68 | |
69 #ifdef USG | |
70 | |
1450
a321ed0fa3ae
(get_lim_data): Make it static.
Richard M. Stallman <rms@gnu.org>
parents:
1399
diff
changeset
|
71 static void |
486 | 72 get_lim_data () |
73 { | |
74 extern long ulimit (); | |
75 | |
76 #ifdef ULIMIT_BREAK_VALUE | |
77 lim_data = ULIMIT_BREAK_VALUE; | |
78 #else | |
79 lim_data = ulimit (3, 0); | |
80 #endif | |
81 | |
82 lim_data -= (long) data_space_start; | |
83 } | |
84 | |
85 #else /* not USG */ | |
86 #ifndef BSD4_2 | |
87 | |
1450
a321ed0fa3ae
(get_lim_data): Make it static.
Richard M. Stallman <rms@gnu.org>
parents:
1399
diff
changeset
|
88 static void |
486 | 89 get_lim_data () |
90 { | |
91 lim_data = vlimit (LIM_DATA, -1); | |
92 } | |
93 | |
94 #else /* BSD4_2 */ | |
95 | |
1450
a321ed0fa3ae
(get_lim_data): Make it static.
Richard M. Stallman <rms@gnu.org>
parents:
1399
diff
changeset
|
96 static void |
486 | 97 get_lim_data () |
98 { | |
99 struct rlimit XXrlimit; | |
100 | |
101 getrlimit (RLIMIT_DATA, &XXrlimit); | |
102 #ifdef RLIM_INFINITY | |
103 lim_data = XXrlimit.rlim_cur & RLIM_INFINITY; /* soft limit */ | |
104 #else | |
105 lim_data = XXrlimit.rlim_cur; /* soft limit */ | |
106 #endif | |
107 } | |
108 #endif /* BSD4_2 */ | |
109 #endif /* not USG */ |