From: Dave Love <fx@gnu.org>
Date: Wed, 17 Sep 2003 19:26:25 +0000 (+0000)
Subject: (ccl_driver): Fix arg of CHARACTERP.
X-Git-Tag: emacs-pretest-23.0.90~8295^2~1826
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0bc6bafd7edde20f55ad4129d8384a1e528e96ff;p=emacs.git

(ccl_driver): Fix arg of CHARACTERP.
---

diff --git a/src/ccl.c b/src/ccl.c
index b9dd47ff17c..55e7422511c 100644
--- a/src/ccl.c
+++ b/src/ccl.c
@@ -1253,7 +1253,7 @@ ccl_driver (ccl, source, destination, src_size, dst_size, charset_list)
 		  {
 		    Lisp_Object opl;
 		    opl = HASH_VALUE (h, op);
-		    if (! CHARACTERP (XINT (opl)))
+		    if (! CHARACTERP (opl))
 		      CCL_INVALID_CMD;
 		    reg[RRR] = charset_unicode;
 		    reg[rrr] = op;