From 58cc0a010b7e16dfcf03d7e858ea27eba5dece65 Mon Sep 17 00:00:00 2001
From: Dmitry Antipov
Date: Thu, 10 Jan 2013 14:30:16 +0400
Subject: Omit buffer_slot_type_mismatch and use generic predicates to enforce
 the type of per-buffer values where appropriate. * src/lisp.h (struct
 Lisp_Buffer_Objfwd): Rename slottype member to predicate, which is how it's
 really used now.  Adjust comment. * src/buffer.h (buffer_slot_type_mismatch):
 Remove prototype. * src/buffer.c (buffer_slot_type_mismatch): Remove.
 (DEFVAR_PER_BUFFER, defvar_per_buffer): Rename type argument to predicate. 
 Adjust comment. (syms_of_buffer): Use Qsymbolp for major-mode.  Use Qintegerp
 for fill-column, left-margin, tab-width, buffer-saved-size,
 left-margin-width, right-margin-width, left-fringe-width, right-fringe-width,
 scroll-bar-width and buffer-display-count. Use Qstringp for
 default-directory, buffer-file-name, buffer-file-truename and
 buffer-auto-save-file-name.  Use Qfloatp for scroll-up-aggressively and
 scroll-down-aggressively.  Use Qnumberp for line-spacing. * src/data.c
 (store_symval_forwarding): Adjust to call the predicate. * lisp/cus-start.el
 (toplevel): Only allow float values for scroll-up-aggressively and
 scroll-down-aggressively. Allow any number for line-spacing.

---
 src/buffer.h | 1 -
 1 file changed, 1 deletion(-)

(limited to 'src/buffer.h')

diff --git a/src/buffer.h b/src/buffer.h
index ec9c34b3eb3..b4cc21d675d 100644
--- a/src/buffer.h
+++ b/src/buffer.h
@@ -1078,7 +1078,6 @@ extern void set_buffer_internal_1 (struct buffer *);
 extern void set_buffer_temp (struct buffer *);
 extern Lisp_Object buffer_local_value_1 (Lisp_Object, Lisp_Object);
 extern void record_buffer (Lisp_Object);
-extern _Noreturn void buffer_slot_type_mismatch (Lisp_Object, int);
 extern void fix_overlays_before (struct buffer *, ptrdiff_t, ptrdiff_t);
 extern void mmap_set_vars (bool);
 
-- 
cgit v1.2.1