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.")