Mercurial > emacs
comparison src/ccl.c @ 80311:23dc6fc4bf91
(ccl_driver): If ccl->quit_silently is nonzero, don't
append "CCL: Quitted" when the CCL program is quitted.
(setup_ccl_program): Initialize ccl->quit_silently to zero.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Mon, 10 Mar 2008 12:18:02 +0000 |
| parents | 88528794e364 |
| children | 4e76a03232e5 |
comparison
equal
deleted
inserted
replaced
| 80310:27c07affc710 | 80311:23dc6fc4bf91 |
|---|---|
| 1907 } | 1907 } |
| 1908 #endif | 1908 #endif |
| 1909 break; | 1909 break; |
| 1910 | 1910 |
| 1911 case CCL_STAT_QUIT: | 1911 case CCL_STAT_QUIT: |
| 1912 sprintf(msg, "\nCCL: Quited."); | 1912 if (! ccl->quit_silently) |
| 1913 sprintf(msg, "\nCCL: Quited."); | |
| 1913 break; | 1914 break; |
| 1914 | 1915 |
| 1915 default: | 1916 default: |
| 1916 sprintf(msg, "\nCCL: Unknown error type (%d)", ccl->status); | 1917 sprintf(msg, "\nCCL: Unknown error type (%d)", ccl->status); |
| 1917 } | 1918 } |
| 2110 ccl->status = 0; | 2111 ccl->status = 0; |
| 2111 ccl->stack_idx = 0; | 2112 ccl->stack_idx = 0; |
| 2112 ccl->eol_type = CODING_EOL_LF; | 2113 ccl->eol_type = CODING_EOL_LF; |
| 2113 ccl->suppress_error = 0; | 2114 ccl->suppress_error = 0; |
| 2114 ccl->eight_bit_control = 0; | 2115 ccl->eight_bit_control = 0; |
| 2116 ccl->quit_silently = 0; | |
| 2115 return 0; | 2117 return 0; |
| 2116 } | 2118 } |
| 2117 | 2119 |
| 2118 | 2120 |
| 2119 /* Check if CCL is updated or not. If not, re-setup members of CCL. */ | 2121 /* Check if CCL is updated or not. If not, re-setup members of CCL. */ |