]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix -Wall compiler warnings in MSDOS sources.
authorEli Zaretskii <eliz@gnu.org>
Fri, 13 Aug 2010 09:21:31 +0000 (12:21 +0300)
committerEli Zaretskii <eliz@gnu.org>
Fri, 13 Aug 2010 09:21:31 +0000 (12:21 +0300)
 msdos.c (IT_set_face): Fix format string to match argument types.
 (IT_write_glyphs, IT_note_mode_line_highlight)
 (IT_set_frame_parameters): Remove unused variables.
 (x_set_menu_bar_lines): Declare set_menu_bar_lines.
 (IT_set_terminal_modes): Disambiguate expression in if clause.
 (Fmsdos_remember_default_colors): Return Qnil.
 (IT_set_frame_parameters): Add parens to disambiguate boolean
 expression for logging the cursor type to termscript.
 (keyboard_layout_list, keypad_translate_map)
 (grey_key_translate_map): Add braces in inner initializers.
 (dos_rawgetc): Add parens in condition for mouse-3 button-press.
 (dos_rawgetc): Remove unused label.
 (XMenuActivate): Add braces to remove ambiguous `else'.
 (dos_ttraw): Always return a value.
 (spawnve): Declare.
 (run_msdos_command): Cast 3rd arg of spawnve to "char **".
 dosfns.h (x_set_title): Declare.
 w16select.c (Fw16_set_clipboard_data, Fw16_get_clipboard_data):
 Remove unused variables.
 dosfns.c (Fint86, Fdos_memget, Fdos_memput): Remove unused variables.
 (init_dosfns): Declare get_lim_data.
 (system_process_attributes): Declare Fget_internal_run_time.

src/ChangeLog
src/dosfns.c
src/dosfns.h
src/msdos.c
src/w16select.c

index 448ce3745c375888f1d1352d4855338cfb98b222..527a5f1d8657b00c1eb0d61dc2440dbc68c97174 100644 (file)
@@ -1,5 +1,33 @@
 2010-08-13  Eli Zaretskii  <eliz@gnu.org>
 
+       * msdos.c (IT_set_face): Fix format string to match argument
+       types.
+       (IT_write_glyphs, IT_note_mode_line_highlight)
+       (IT_set_frame_parameters): Remove unused variables.
+       (x_set_menu_bar_lines): Declare set_menu_bar_lines.
+       (IT_set_terminal_modes): Disambiguate expression in if clause.
+       (Fmsdos_remember_default_colors): Return Qnil.
+       (IT_set_frame_parameters): Add parens to disambiguate boolean
+       expression for logging the cursor type to termscript.
+       (keyboard_layout_list, keypad_translate_map)
+       (grey_key_translate_map): Add braces in inner initializers.
+       (dos_rawgetc): Add parens in condition for mouse-3 button-press.
+       (dos_rawgetc): Remove unused label.
+       (XMenuActivate): Add braces to remove ambiguous `else'.
+       (dos_ttraw): Always return a value.
+       (spawnve): Declare.
+       (run_msdos_command): Cast 3rd arg of spawnve to "char **".
+
+       * dosfns.h (x_set_title): Declare.
+
+       * w16select.c (Fw16_set_clipboard_data, Fw16_get_clipboard_data):
+       Remove unused variables.
+
+       * dosfns.c (Fint86, Fdos_memget, Fdos_memput): Remove unused
+       variables.
+       (init_dosfns): Declare get_lim_data.
+       (system_process_attributes): Declare Fget_internal_run_time.
+
        * xmenu.c (xmenu_show) [!USE_X_TOOLKIT && !USE_GTK]: Fix argument
        list to be consistent with menu.h.
 
index 5be0a363da84ddec2977c4841726ee175ac55004..e66b50ed3ffccca3475f28b4f0e5ed8112e6d682 100644 (file)
@@ -60,7 +60,6 @@ REGISTERS should be a vector produced by `make-register' and
   register int i;
   int no;
   union REGS inregs, outregs;
-  Lisp_Object val;
 
   CHECK_NUMBER (interrupt);
   no = (unsigned long) XINT (interrupt);
@@ -101,7 +100,6 @@ Return the updated VECTOR.  */)
   register int i;
   int offs, len;
   char *buf;
-  Lisp_Object val;
 
   CHECK_NUMBER (address);
   offs = (unsigned long) XINT (address);
@@ -125,7 +123,6 @@ DEFUN ("msdos-memput", Fdos_memput, Sdos_memput, 2, 2, 0,
   register int i;
   int offs, len;
   char *buf;
-  Lisp_Object val;
 
   CHECK_NUMBER (address);
   offs = (unsigned long) XINT (address);
@@ -286,6 +283,8 @@ init_dosfns (void)
   unsigned long xbuf = _go32_info_block.linear_address_of_transfer_buffer;
 
 #ifndef SYSTEM_MALLOC
+  extern void get_lim_data (void);
+
   get_lim_data (); /* why the hell isn't this called elsewhere? */
 #endif
 
@@ -558,6 +557,7 @@ system_process_attributes (Lisp_Object pid)
       int i;
       Lisp_Object cmd_str, decoded_cmd, tem;
       double pmem;
+      EXFUN (Fget_internal_run_time, 0);
 #ifndef SYSTEM_MALLOC
       extern unsigned long ret_lim_data ();
 #endif
index 820b6b30e43f48a36612ff7f19898190e02b30e1..d31401247b42c0657b359b9683fdaabb6cf4b1fa 100644 (file)
@@ -40,6 +40,7 @@ extern Lisp_Object Vdos_display_scancodes;
 
 extern int         msdos_stdcolor_idx  (const char *);
 extern Lisp_Object msdos_stdcolor_name (int);
+extern void        x_set_title (struct frame *, Lisp_Object);
 #endif
 
 /* arch-tag: a83b8c4c-63c8-451e-9e94-bc72e3e2f8bc
index ad529d00dea4dc844c85928ecb98dacdfa1e520e..086cad2ff84889db4b2b49e6309bcc70040ba294 100644 (file)
@@ -68,8 +68,10 @@ along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.  */
 #include <pc.h>
 #include <ctype.h>
 /* #include <process.h> */
-/* Damn that local process.h!  Instead we can define P_WAIT ourselves.  */
+/* Damn that local process.h!  Instead we can define P_WAIT and
+   spawnve ourselves.  */
 #define P_WAIT 1
+extern int spawnve (int, const char *, char *const [], char *const []);
 
 #ifndef _USE_LFN
 #define _USE_LFN 0
@@ -827,7 +829,7 @@ IT_set_face (int face)
       bg = tem2;
     }
   if (tty->termscript)
-    fprintf (tty->termscript, "<FACE %d: %d/%d[FG:%d/BG:%d]>", face,
+    fprintf (tty->termscript, "<FACE %d: %lu/%lu[FG:%lu/BG:%lu]>", face,
             fp->foreground, fp->background, fg, bg);
   if (fg >= 0 && fg < 16)
     {
@@ -859,12 +861,6 @@ IT_write_glyphs (struct frame *f, struct glyph *str, int str_len)
   struct frame *sf;
   unsigned char *conversion_buffer;
 
-  /* Do we need to consider conversion of unibyte characters to
-     multibyte?  */
-  int convert_unibyte_characters
-    = (NILP (current_buffer->enable_multibyte_characters)
-       && unibyte_display_via_language_environment);
-
   /* If terminal_coding does any conversion, use it, otherwise use
      safe_terminal_coding.  We can't use CODING_REQUIRE_ENCODING here
      because it always returns 1 if terminal_coding.src_multibyte is 1.  */
@@ -1180,8 +1176,6 @@ fast_find_position (struct window *w, int pos, int *hpos, int *vpos)
 static void
 IT_note_mode_line_highlight (struct window *w, int x, int mode_line_p)
 {
-  struct frame *f = XFRAME (w->frame);
-  struct tty_display_info *dpyinfo = FRAME_X_DISPLAY_INFO (f);
   struct glyph_row *row;
 
   if (mode_line_p)
@@ -1192,7 +1186,7 @@ IT_note_mode_line_highlight (struct window *w, int x, int mode_line_p)
   if (row->enabled_p)
     {
       struct glyph *glyph, *end;
-      Lisp_Object help, map;
+      Lisp_Object help;
 
       /* Find the glyph under X.  */
       glyph = (row->glyphs[TEXT_AREA]
@@ -1873,6 +1867,8 @@ IT_delete_glyphs (struct frame *f, int n)
 void
 x_set_menu_bar_lines (struct frame *f, Lisp_Object value, Lisp_Object oldval)
 {
+  extern void set_menu_bar_lines (struct frame *, Lisp_Object, Lisp_Object);
+
   set_menu_bar_lines (f, value, oldval);
 }
 
@@ -1939,7 +1935,7 @@ IT_set_terminal_modes (struct terminal *term)
           already point to the relocated buffer address returned by
           the Int 10h/AX=FEh call above.  DJGPP v2.02 and later sets
           ScreenPrimary to that address at startup under DOS/V.  */
-       if (regs.x.es != (ScreenPrimary >> 4) & 0xffff)
+       if (regs.x.es != ((ScreenPrimary >> 4) & 0xffff))
          screen_old_address = ScreenPrimary;
        screen_virtual_segment = regs.x.es;
        screen_virtual_offset  = regs.x.di;
@@ -2056,6 +2052,8 @@ DEFUN ("msdos-remember-default-colors", Fmsdos_remember_default_colors,
      frame colors are reversed.  */
   initial_screen_colors[0] = FRAME_FOREGROUND_PIXEL (f);
   initial_screen_colors[1] = FRAME_BACKGROUND_PIXEL (f);
+
+  return Qnil;
 }
 
 void
@@ -2071,7 +2069,6 @@ IT_set_frame_parameters (struct frame *f, Lisp_Object alist)
   int reverse = EQ (Fcdr (Fassq (Qreverse, f->param_alist)), Qt);
   int redraw = 0, fg_set = 0, bg_set = 0;
   unsigned long orig_fg, orig_bg;
-  Lisp_Object frame_bg, frame_fg;
   struct tty_display_info *tty = FRAME_TTY (f);
 
   /* If we are creating a new frame, begin with the original screen colors
@@ -2195,9 +2192,10 @@ IT_set_frame_parameters (struct frame *f, Lisp_Object alist)
          IT_set_cursor_type (f, val);
          if (tty->termscript)
            fprintf (tty->termscript, "<CTYPE: %s>\n",
-                    EQ (val, Qbar) || EQ (val, Qhbar)
-                    || CONSP (val) && (EQ (XCAR (val), Qbar)
-                                       || EQ (XCAR (val), Qhbar))
+                    EQ (val, Qbar)
+                    || EQ (val, Qhbar)
+                    || (CONSP (val) && (EQ (XCAR (val), Qbar)
+                                        || EQ (XCAR (val), Qhbar)))
                     ? "bar" : "box");
        }
       else if (EQ (prop, Qtty_type))
@@ -2214,8 +2212,6 @@ IT_set_frame_parameters (struct frame *f, Lisp_Object alist)
      the current frame colors.  */
   if (reverse)
     {
-      Lisp_Object frame;
-
       if (!fg_set)
        {
          FRAME_FOREGROUND_PIXEL (f) = orig_bg;
@@ -2532,11 +2528,11 @@ static struct keyboard_layout_list
   struct dos_keyboard_map *keyboard_map;
 } keyboard_layout_list[] =
 {
-  1, &us_keyboard,
-  33, &fr_keyboard,
-  39, &it_keyboard,
-  45, &dk_keyboard,
-  81, &jp_keyboard
+  { 1, &us_keyboard },
+  { 33, &fr_keyboard },
+  { 39, &it_keyboard },
+  { 45, &dk_keyboard },
+  { 81, &jp_keyboard }
 };
 
 static struct dos_keyboard_map *keyboard;
@@ -2581,17 +2577,17 @@ static struct
   unsigned char keypad_code;   /* keypad code  */
   unsigned char editkey_code;  /* edit key     */
 } keypad_translate_map[] = {
-  '0',  '0',  0xb0, /* kp-0 */         0x63, /* insert */
-  '1',  '1',  0xb1, /* kp-1 */         0x57, /* end */
-  '2',  '2',  0xb2, /* kp-2 */         0x54, /* down */
-  '3',  '3',  0xb3, /* kp-3 */         0x56, /* next */
-  '4',  '4',  0xb4, /* kp-4 */         0x51, /* left */
-  '5',  '5',  0xb5, /* kp-5 */         0xb5, /* kp-5 */
-  '6',  '6',  0xb6, /* kp-6 */         0x53, /* right */
-  '7',  '7',  0xb7, /* kp-7 */         0x50, /* home */
-  '8',  '8',  0xb8, /* kp-8 */         0x52, /* up */
-  '9',  '9',  0xb9, /* kp-9 */         0x55, /* prior */
-  '.',  '-',  0xae, /* kp-decimal */   0xff  /* delete */
+  { '0',  '0',  0xb0, /* kp-0 */               0x63 /* insert */ },
+  { '1',  '1',  0xb1, /* kp-1 */               0x57 /* end */    },
+  { '2',  '2',  0xb2, /* kp-2 */               0x54 /* down */   },
+  { '3',  '3',  0xb3, /* kp-3 */               0x56 /* next */   },
+  { '4',  '4',  0xb4, /* kp-4 */               0x51 /* left */   },
+  { '5',  '5',  0xb5, /* kp-5 */               0xb5 /* kp-5 */   },
+  { '6',  '6',  0xb6, /* kp-6 */               0x53 /* right */  },
+  { '7',  '7',  0xb7, /* kp-7 */               0x50 /* home */   },
+  { '8',  '8',  0xb8, /* kp-8 */               0x52 /* up */     },
+  { '9',  '9',  0xb9, /* kp-9 */               0x55 /* prior */  },
+  { '.',  '-',  0xae, /* kp-decimal */         0xff  /* delete */}
 };
 
 static struct
@@ -2599,11 +2595,11 @@ static struct
   unsigned char char_code;     /* normal code  */
   unsigned char keypad_code;   /* keypad code  */
 } grey_key_translate_map[] = {
-  '/',  0xaf, /* kp-decimal */
-  '*',  0xaa, /* kp-multiply */
-  '-',  0xad, /* kp-subtract */
-  '+',  0xab, /* kp-add */
-  '\r', 0x8d  /* kp-enter */
+  { '/',  0xaf /* kp-decimal */  },
+  { '*',  0xaa /* kp-multiply */ },
+  { '-',  0xad /* kp-subtract */ },
+  { '+',  0xab /* kp-add */      },
+  { '\r', 0x8d  /* kp-enter */   }
 };
 
 static unsigned short
@@ -3129,7 +3125,6 @@ dos_rawgetc (void)
          break;
        }
 
-    make_event:
       if (code == 0)
        continue;
 
@@ -3237,14 +3232,14 @@ dos_rawgetc (void)
                    /* If only one button is pressed, wait 100 msec and
                       check again.  This way, Speedy Gonzales isn't
                       punished, while the slow get their chance.  */
-                   if (press && mouse_pressed (1-but, &x2, &y2)
-                       || !press && mouse_released (1-but, &x2, &y2))
+                   if ((press && mouse_pressed (1-but, &x2, &y2))
+                       || (!press && mouse_released (1-but, &x2, &y2)))
                      button_num = 2;
                    else
                      {
                        delay (100);
-                       if (press && mouse_pressed (1-but, &x2, &y2)
-                           || !press && mouse_released (1-but, &x2, &y2))
+                       if ((press && mouse_pressed (1-but, &x2, &y2))
+                           || (!press && mouse_released (1-but, &x2, &y2)))
                          button_num = 2;
                      }
                  }
@@ -3680,10 +3675,12 @@ XMenuActivate (Display *foo, XMenu *menu, int *pane, int *selidx,
                if (0 <= dy && dy < state[i].menu->count)
                  {
                    if (!state[i].menu->submenu[dy])
-                     if (state[i].menu->panenumber[dy])
-                       result = XM_SUCCESS;
-                     else
-                       result = XM_IA_SELECT;
+                     {
+                       if (state[i].menu->panenumber[dy])
+                         result = XM_SUCCESS;
+                       else
+                         result = XM_IA_SELECT;
+                     }
                    *pane = state[i].pane - 1;
                    *selidx = dy;
                    /* We hit some part of a menu, so drop extra menus that
@@ -4181,7 +4178,7 @@ dos_ttraw (struct tty_display_info *tty)
   /* If we are called for the initial terminal, it's too early to do
      anything, and termscript isn't set up.  */
   if (tty->terminal->type == output_initial)
-    return;
+    return 2;
 
   break_stat = getcbrk ();
   setcbrk (0);
@@ -4367,7 +4364,7 @@ run_msdos_command (unsigned char **argv, const char *working_dir,
        result = 0;     /* emulate Unixy shell behavior with empty cmd line */
     }
   else
-    result = spawnve (P_WAIT, argv[0], argv, envv);
+    result = spawnve (P_WAIT, argv[0], (char **)argv, envv);
 
   dup2 (inbak, 0);
   dup2 (outbak, 1);
index 384b82ceff178410bc5a1d9c93dff2844473d627..ef1b974752bb9859e0aecd59bd8f2258275d1ab7 100644 (file)
@@ -456,7 +456,7 @@ DEFUN ("w16-set-clipboard-data", Fw16_set_clipboard_data, Sw16_set_clipboard_dat
   (Lisp_Object string, Lisp_Object frame)
 {
   unsigned ok = 1, put_status = 0;
-  int nbytes, charset_info, no_crlf_conversion;
+  int nbytes, no_crlf_conversion;
   unsigned char *src, *dst = NULL;
 
   CHECK_STRING (string);
@@ -494,9 +494,7 @@ DEFUN ("w16-set-clipboard-data", Fw16_set_clipboard_data, Sw16_set_clipboard_dat
     {
       /* We must encode contents of STRING according to what
         clipboard-coding-system specifies.  */
-      int bufsize;
       struct coding_system coding;
-      unsigned char *htext2;
       Lisp_Object coding_system =
        NILP (Vnext_selection_coding_system) ?
        Vselection_coding_system : Vnext_selection_coding_system;
@@ -567,7 +565,7 @@ DEFUN ("w16-get-clipboard-data", Fw16_get_clipboard_data, Sw16_get_clipboard_dat
   unsigned data_size, truelen;
   unsigned char *htext = NULL;
   Lisp_Object ret = Qnil;
-  int no_crlf_conversion, require_decoding = 0;
+  int require_decoding = 0;
 
   if (NILP (frame))
     frame = Fselected_frame ();
@@ -608,8 +606,6 @@ DEFUN ("w16-get-clipboard-data", Fw16_get_clipboard_data, Sw16_get_clipboard_dat
   }
   if (require_decoding)
     {
-      int bufsize;
-      unsigned char *buf;
       struct coding_system coding;
       Lisp_Object coding_system = Vnext_selection_coding_system;