changeset 88631:780b91d4a7e5

(setup_iso_safe_charsets): Fix arg decl for K&R. (suffixes): Moved out of make_subsidiaries for K&R.
author Dave Love <fx@gnu.org>
date Fri, 24 May 2002 15:33:29 +0000
parents 9f589c592e30
children 443aecffdcc5
files src/coding.c
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/coding.c	Fri May 24 15:32:30 2002 +0000
+++ b/src/coding.c	Fri May 24 15:33:29 2002 +0000
@@ -2205,7 +2205,8 @@
   (CODING_ISO_INITIAL (&coding_categories[category], 1) >= 0)
 
 static void
-setup_iso_safe_charsets (Lisp_Object attrs)
+setup_iso_safe_charsets (attrs)
+     Lisp_Object attrs;
 {
   Lisp_Object charset_list, safe_charsets;
   Lisp_Object request;
@@ -7248,12 +7249,13 @@
   return Fnreverse (val);
 }
 
+static char *suffixes[] = { "-unix", "-dos", "-mac" };
+
 static Lisp_Object
 make_subsidiaries (base)
      Lisp_Object base;
 {
   Lisp_Object subsidiaries;
-  char *suffixes[] = { "-unix", "-dos", "-mac" };
   int base_name_len = STRING_BYTES (XSYMBOL (base)->name);
   char *buf = (char *) alloca (base_name_len + 6);
   int i;