diff options
| author | Dave Love <fx@gnu.org> | 2003-09-17 19:26:25 +0000 |
|---|---|---|
| committer | Dave Love <fx@gnu.org> | 2003-09-17 19:26:25 +0000 |
| commit | 0bc6bafd7edde20f55ad4129d8384a1e528e96ff (patch) | |
| tree | 6d6e048e2d8e05aa3ae18ab47849d4fb6e1f0df5 /src/ccl.c | |
| parent | be41d5d001771ff30e2ef19723c4fd9595681544 (diff) | |
| download | emacs-0bc6bafd7edde20f55ad4129d8384a1e528e96ff.tar.gz emacs-0bc6bafd7edde20f55ad4129d8384a1e528e96ff.tar.bz2 emacs-0bc6bafd7edde20f55ad4129d8384a1e528e96ff.zip | |
(ccl_driver): Fix arg of CHARACTERP.
Diffstat (limited to 'src/ccl.c')
| -rw-r--r-- | src/ccl.c | 2 |
1 files changed, 1 insertions, 1 deletions
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; |