HCoop
/
bpt
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
261d788
)
(Fregister_ccl_program): Handle the return value of
author
Kenichi Handa
<handa@m17n.org>
Tue, 16 Jan 2001 08:28:01 +0000
(08:28 +0000)
committer
Kenichi Handa
<handa@m17n.org>
Tue, 16 Jan 2001 08:28:01 +0000
(08:28 +0000)
resolve_symbol_ccl_program correctly.
src/ccl.c
patch
|
blob
|
blame
|
history
diff --git
a/src/ccl.c
b/src/ccl.c
index
bd9c7d4
..
2b27a2c
100644
(file)
--- a/
src/ccl.c
+++ b/
src/ccl.c
@@
-2111,11
+2111,15
@@
Return index number of the registered CCL program.")
{
CHECK_VECTOR (ccl_prog, 1);
resolved = resolve_symbol_ccl_program (ccl_prog);
- if (! NILP (resolved))
+ if (NILP (resolved))
+ error ("Error in CCL program");
+ if (VECTORP (resolved))
{
ccl_prog = resolved;
resolved = Qt;
}
+ else
+ resolved = Qnil;
}
for (idx = 0; idx < len; idx++)