diff src/specifier.c @ 169:15872534500d r20-3b11

Import from CVS: tag r20-3b11
author cvs
date Mon, 13 Aug 2007 09:46:53 +0200
parents 43dd3413c7c7
children 8eaf7971accc
line wrap: on
line diff
--- a/src/specifier.c	Mon Aug 13 09:45:48 2007 +0200
+++ b/src/specifier.c	Mon Aug 13 09:46:53 2007 +0200
@@ -2886,16 +2886,16 @@
 
 DEFINE_SPECIFIER_TYPE (display_table);
 
-void
-display_table_validate(instantiator)
-Lisp_Object instantiator;
+static void
+display_table_validate (Lisp_Object instantiator)
 {
   if (!NILP(instantiator) &&
       (!VECTORP (instantiator) ||
        XVECTOR (instantiator)->size != DISP_TABLE_SIZE))
-    dead_wrong_type_argument(display_table_specifier_methods->predicate_symbol, instantiator);
-  return;
+    dead_wrong_type_argument (display_table_specifier_methods->predicate_symbol,
+			      instantiator);
 }
+
 DEFUN ("display-table-specifier-p", Fdisplay_table_specifier_p, 1, 1, 0, /*
 Return non-nil if OBJECT is an display-table specifier.
 */