Mercurial > emacs
changeset 35322:ac015053a9a1
(Fregister_ccl_program): Handle the return value of
resolve_symbol_ccl_program correctly.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Tue, 16 Jan 2001 08:28:01 +0000 |
| parents | 44f49244c7bd |
| children | 8329471c78d4 |
| files | src/ccl.c |
| diffstat | 1 files changed, 5 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ccl.c Tue Jan 16 08:27:47 2001 +0000 +++ b/src/ccl.c Tue Jan 16 08:28:01 2001 +0000 @@ -2111,11 +2111,15 @@ { 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++)