Mercurial > emacs
comparison src/coding.c @ 28512:01292435daaf
* coding.h (code_convert_string): Declare.
* coding.c (code_convert_string_norecord): Pass an int, not a lisp object, as
the fourth argument to code_convert_string.
author | Ken Raeburn <raeburn@raeburn.org> |
---|---|
date | Sat, 08 Apr 2000 19:34:29 +0000 |
parents | 6c41f3276340 |
children | b396df3a5181 |
comparison
equal
deleted
inserted
replaced
28511:7a9707590ccd | 28512:01292435daaf |
---|---|
5652 if (setup_coding_system (Fcheck_coding_system (coding_system), &coding) < 0) | 5652 if (setup_coding_system (Fcheck_coding_system (coding_system), &coding) < 0) |
5653 error ("Invalid coding system: %s", XSYMBOL (coding_system)->name->data); | 5653 error ("Invalid coding system: %s", XSYMBOL (coding_system)->name->data); |
5654 | 5654 |
5655 coding.composing = COMPOSITION_DISABLED; | 5655 coding.composing = COMPOSITION_DISABLED; |
5656 coding.mode |= CODING_MODE_LAST_BLOCK; | 5656 coding.mode |= CODING_MODE_LAST_BLOCK; |
5657 return code_convert_string (string, &coding, encodep, Qt); | 5657 return code_convert_string (string, &coding, encodep, 1); |
5658 } | 5658 } |
5659 | 5659 |
5660 DEFUN ("decode-sjis-char", Fdecode_sjis_char, Sdecode_sjis_char, 1, 1, 0, | 5660 DEFUN ("decode-sjis-char", Fdecode_sjis_char, Sdecode_sjis_char, 1, 1, 0, |
5661 "Decode a Japanese character which has CODE in shift_jis encoding.\n\ | 5661 "Decode a Japanese character which has CODE in shift_jis encoding.\n\ |
5662 Return the corresponding character.") | 5662 Return the corresponding character.") |