diff src/specifier.c @ 578:190b164ddcac

[xemacs-hg @ 2001-05-25 11:26:50 by ben] device-msw.c, eldap.c, emodules.c, hpplay.c, process-unix.c, sound.h, tooltalk.c, win32.c: Revert Martin's attempted compile-warnings fix. It does fix the warnings, but not the right way. We are trying to eliminate the raw use of `char' and `unsigned char' absolutely everywhere. There is never an occasion to reintroduce these. buffer.h: Instead, we fix these macros so they don't care about the type of their lvalues. We already do this for the non-C-string equivalents of these, and it's correct because it should be OK to pass in an SBufbyte *, for example. In any case, we do not need any type-correctness checking here -- errors will be caught for sure as soon as we remove the -Wno-sign-compare switch. mule-charset.c: Use invalid_argument, not generic signal_error (Qerror, ). alloc.c, chartab.c, console-gtk.c, console-msw.c, console-stream.c, console-stream.h, console-tty.c, console-tty.h, console-x.c, console.c, console.h, device-x.c, device.c, elhash.c, eval.c, faces.c, faces.h, fns.c, glyphs.c, glyphs.h, gui.c, gui.h, lisp.h, lread.c, nt.c, objects-gtk.c, objects-gtk.h, objects-msw.c, objects-tty.c, objects-x.c, objects.c, process-unix.c, rangetab.c, search.c, specifier.c, toolbar.c, window.c, window.h: Rename Error_behavior to Error_Behavior, to be consistent with general naming practices (Lisp_Object, Char_Binary, etc.).
author ben
date Fri, 25 May 2001 11:27:01 +0000
parents 183866b06e0b
children b39c14581166
line wrap: on
line diff
--- a/src/specifier.c	Fri May 25 10:04:29 2001 +0000
+++ b/src/specifier.c	Fri May 25 11:27:01 2001 +0000
@@ -419,7 +419,7 @@
 /************************************************************************/
 
 static struct specifier_methods *
-decode_specifier_type (Lisp_Object type, Error_behavior errb)
+decode_specifier_type (Lisp_Object type, Error_Behavior errb)
 {
   int i;
 
@@ -1160,7 +1160,7 @@
 static Lisp_Object
 check_valid_instantiator (Lisp_Object instantiator,
 			  struct specifier_methods *meths,
-			  Error_behavior errb)
+			  Error_Behavior errb)
 {
   if (meths->validate_method)
     {
@@ -1215,7 +1215,7 @@
 
 static Lisp_Object
 check_valid_inst_list (Lisp_Object inst_list, struct specifier_methods *meths,
-		       Error_behavior errb)
+		       Error_Behavior errb)
 {
   Lisp_Object rest;
 
@@ -1274,7 +1274,7 @@
 
 static Lisp_Object
 check_valid_spec_list (Lisp_Object spec_list, struct specifier_methods *meths,
-		       Error_behavior errb)
+		       Error_Behavior errb)
 {
   Lisp_Object rest;
 
@@ -2352,7 +2352,7 @@
 static Lisp_Object
 check_valid_specifier_matchspec (Lisp_Object matchspec,
 				 struct specifier_methods *meths,
-				 Error_behavior errb)
+				 Error_Behavior errb)
 {
   if (meths->validate_matchspec_method)
     {
@@ -2467,7 +2467,7 @@
 				   Lisp_Object matchspec,
 				   Lisp_Object domain,
 				   Lisp_Object inst_list,
-				   Error_behavior errb, int no_quit,
+				   Error_Behavior errb, int no_quit,
 				   Lisp_Object depth)
 {
   /* This function can GC */
@@ -2545,7 +2545,7 @@
    triggered by a user call, who knows what it will usually be. */
 Lisp_Object
 specifier_instance (Lisp_Object specifier, Lisp_Object matchspec,
-		    Lisp_Object domain, Error_behavior errb, int no_quit,
+		    Lisp_Object domain, Error_Behavior errb, int no_quit,
 		    int no_fallback, Lisp_Object depth)
 {
   Lisp_Object buffer = Qnil;
@@ -2645,7 +2645,7 @@
 
 Lisp_Object
 specifier_instance_no_quit (Lisp_Object specifier, Lisp_Object matchspec,
-			    Lisp_Object domain, Error_behavior errb,
+			    Lisp_Object domain, Error_Behavior errb,
 			    int no_fallback, Lisp_Object depth)
 {
   return specifier_instance (specifier, matchspec, domain, errb,