(cancel_hourglass_unwind): Return a value.

(modify_event_symbol): Always use %ld for printing EMACS_INT.
(Fexecute_extended_command): Likewise.

diff --git a/src/ChangeLog b/src/ChangeLog
index c515a13d605e829151b3d3071cefdacae4433aa3..37719505adf2a5f5550727cbb7d0905f44776485 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,23 @@
 2004-06-13  Andreas Schwab  <schwab@suse.de>
 
+       * print.c (print_object): Always use %ld for printing EMACS_INT.
+
+       * keyboard.c (cancel_hourglass_unwind): Return a value.
+       (modify_event_symbol): Always use %ld for printing EMACS_INT.
+       (Fexecute_extended_command): Likewise.
+
+       * syntax.h (SYNTAX_ENTRY_FOLLOW_PARENT): Rename local variable to
+       avoid clashes.
+       (SYNTAX): Likewise.
+       (SYNTAX_WITH_FLAGS): Likewise.
+       (SYNTAX_MATCH): Likewise.
+
+       * syntax.c (char_quoted): Avoid warning about undefined operation.
+       (find_defun_start): Likewise.
+       (scan_lists): Likewise.
+       (INC_FROM): Likewise.
+       (scan_sexps_forward): Likewise.
+
        * image.c: Include <ctype.h>.
 
        * xfaces.c (face_attr_equal_p): Declare parameters.

diff --git a/src/keyboard.c b/src/keyboard.c
index 042c3108ca8ad83572758c2f8787fc84955737d8..86642a99552c4bd3406a4829edcb5231d87561f8 100644 (file)
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -1348,6 +1348,7 @@ cancel_hourglass_unwind (arg)
      Lisp_Object arg;
 {
   cancel_hourglass ();
+  return Qnil;
 }
 #endif
 
@@ -6256,12 +6257,8 @@ modify_event_symbol (symbol_num, modifiers, symbol_kind, name_alist_or_stem,
        {
          int len = SBYTES (name_alist_or_stem);
          char *buf = (char *) alloca (len + 50);
-         if (sizeof (int) == sizeof (EMACS_INT))
-           sprintf (buf, "%s-%d", SDATA (name_alist_or_stem),
-                    XINT (symbol_int) + 1);
-         else if (sizeof (long) == sizeof (EMACS_INT))
-           sprintf (buf, "%s-%ld", SDATA (name_alist_or_stem),
-                    XINT (symbol_int) + 1);
+         sprintf (buf, "%s-%ld", SDATA (name_alist_or_stem),
+                  (long) XINT (symbol_int) + 1);
          value = intern (buf);
        }
       else if (name_table != 0 && name_table[symbol_num])
@@ -9714,23 +9711,9 @@ DEFUN ("execute-extended-command", Fexecute_extended_command, Sexecute_extended_
   else if (CONSP (prefixarg) && XINT (XCAR (prefixarg)) == 4)
     strcpy (buf, "C-u ");
   else if (CONSP (prefixarg) && INTEGERP (XCAR (prefixarg)))
-    {
-      if (sizeof (int) == sizeof (EMACS_INT))
-       sprintf (buf, "%d ", XINT (XCAR (prefixarg)));
-      else if (sizeof (long) == sizeof (EMACS_INT))
-       sprintf (buf, "%ld ", (long) XINT (XCAR (prefixarg)));
-      else
-       abort ();
-    }
+    sprintf (buf, "%ld ", (long) XINT (XCAR (prefixarg)));
   else if (INTEGERP (prefixarg))
-    {
-      if (sizeof (int) == sizeof (EMACS_INT))
-       sprintf (buf, "%d ", XINT (prefixarg));
-      else if (sizeof (long) == sizeof (EMACS_INT))
-       sprintf (buf, "%ld ", (long) XINT (prefixarg));
-      else
-       abort ();
-    }
+    sprintf (buf, "%ld ", (long) XINT (prefixarg));
 
   /* This isn't strictly correct if execute-extended-command
      is bound to anything else.  Perhaps it should use