From: tomo <tomo>
Date: Tue, 16 Oct 2001 05:08:23 +0000 (+0000)
Subject: Move EXFUN for Fmake_char and Fdecode_char into chartab.h.
X-Git-Tag: r21-2-41-utf-2000-0_18-1~190
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=a8607b4c684260f2e9ee2b547652efe62e865979;p=chise%2Fxemacs-chise.git

Move EXFUN for Fmake_char and Fdecode_char into chartab.h.
(Fdefine_char): Modify for Fdecode_char.
(Ffind_char): Likewise.
---

diff --git a/src/chartab.c b/src/chartab.c
index 2c4f368..e941464 100644
--- a/src/chartab.c
+++ b/src/chartab.c
@@ -3102,9 +3102,6 @@ the entire table.
   return slarg.retval;
 }
 
-EXFUN (Fmake_char, 3);
-EXFUN (Fdecode_char, 2);
-
 DEFUN ("define-char", Fdefine_char, 1, 1, 0, /*
 Store character's ATTRIBUTES.
 */
@@ -3131,7 +3128,7 @@ Store character's ATTRIBUTES.
 	      if (CONSP (cell))
 		character = Fmake_char (ccs, Fcar (cell), Fcar (Fcdr (cell)));
 	      else
-		character = Fdecode_char (ccs, cell);
+		character = Fdecode_char (ccs, cell, Qnil);
 	      if (!NILP (character))
 		goto setup_attributes;
 	    }
@@ -3190,7 +3187,7 @@ Retrieve the character of the given ATTRIBUTES.
 	  if (CONSP (cell))
 	    return Fmake_char (ccs, Fcar (cell), Fcar (Fcdr (cell)));
 	  else
-	    return Fdecode_char (ccs, cell);
+	    return Fdecode_char (ccs, cell, Qnil);
 	}
       rest = Fcdr (rest);
     }