From: Kenichi Handa <handa@m17n.org>
Date: Wed, 24 Jan 2001 23:29:59 +0000 (+0000)
Subject: (ccl_driver): If ccl->suppress_error is nonzeor, don't
X-Git-Tag: emacs-pretest-21.0.96~111
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ae08ba36c9f16b0763f84cea5afdab561bd08c3f;p=emacs.git

(ccl_driver): If ccl->suppress_error is nonzeor, don't
insert error message to the output.
(setup_ccl_program): Initialize ccl->suppress_error to 0.
---

diff --git a/src/ccl.c b/src/ccl.c
index de50374f9f8..259ae8662f5 100644
--- a/src/ccl.c
+++ b/src/ccl.c
@@ -1720,7 +1720,8 @@ ccl_driver (ccl, source, destination, src_bytes, dst_bytes, consumed)
     }
 
  ccl_error_handler:
-  if (destination)
+  if (ccl->suppress_error
+      && destination)
     {
       /* We can insert an error message only if DESTINATION is
          specified and we still have a room to store the message
@@ -1937,6 +1938,7 @@ setup_ccl_program (ccl, ccl_prog)
   ccl->status = 0;
   ccl->stack_idx = 0;
   ccl->eol_type = CODING_EOL_LF;
+  ccl->suppress_error = 0;
   return 0;
 }