aboutsummaryrefslogtreecommitdiffstats
path: root/src/alloc.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/alloc.c')
-rw-r--r--src/alloc.c10
1 files changed, 3 insertions, 7 deletions
diff --git a/src/alloc.c b/src/alloc.c
index 2a15fd0d63d..5c860bc1f8e 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -23,10 +23,6 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
23#include <limits.h> /* For CHAR_BIT. */ 23#include <limits.h> /* For CHAR_BIT. */
24#include <setjmp.h> 24#include <setjmp.h>
25 25
26#ifdef STDC_HEADERS
27#include <stddef.h> /* For offsetof, used by PSEUDOVECSIZE. */
28#endif
29
30#ifdef ALLOC_DEBUG 26#ifdef ALLOC_DEBUG
31#undef INLINE 27#undef INLINE
32#endif 28#endif
@@ -298,7 +294,7 @@ static EMACS_INT pure_bytes_used_non_lisp;
298/* If nonzero, this is a warning delivered by malloc and not yet 294/* If nonzero, this is a warning delivered by malloc and not yet
299 displayed. */ 295 displayed. */
300 296
301char *pending_malloc_warning; 297const char *pending_malloc_warning;
302 298
303/* Pre-computed signal argument for use when memory is exhausted. */ 299/* Pre-computed signal argument for use when memory is exhausted. */
304 300
@@ -514,7 +510,7 @@ static POINTER_TYPE *pure_alloc (size_t, int);
514/* Function malloc calls this if it finds we are near exhausting storage. */ 510/* Function malloc calls this if it finds we are near exhausting storage. */
515 511
516void 512void
517malloc_warning (char *str) 513malloc_warning (const char *str)
518{ 514{
519 pending_malloc_warning = str; 515 pending_malloc_warning = str;
520} 516}
@@ -3030,7 +3026,7 @@ usage: (make-byte-code ARGLIST BYTE-CODE CONSTANTS DEPTH &optional DOCSTRING INT
3030 else 3026 else
3031 val = Fmake_vector (len, Qnil); 3027 val = Fmake_vector (len, Qnil);
3032 3028
3033 if (STRINGP (args[1]) && STRING_MULTIBYTE (args[1])) 3029 if (nargs > 1 && STRINGP (args[1]) && STRING_MULTIBYTE (args[1]))
3034 /* BYTECODE-STRING must have been produced by Emacs 20.2 or the 3030 /* BYTECODE-STRING must have been produced by Emacs 20.2 or the
3035 earlier because they produced a raw 8-bit string for byte-code 3031 earlier because they produced a raw 8-bit string for byte-code
3036 and now such a byte-code string is loaded as multibyte while 3032 and now such a byte-code string is loaded as multibyte while