Mercurial > emacs
comparison src/coding.c @ 51406:3c675181c3d8
(Qutf_8): New.
(syms_of_coding): Intern it.
author | Dave Love <fx@gnu.org> |
---|---|
date | Mon, 02 Jun 2003 18:49:29 +0000 |
parents | 8da3b8a0ca4f |
children | 28be64986453 |
comparison
equal
deleted
inserted
replaced
51405:c3e680aa1a51 | 51406:3c675181c3d8 |
---|---|
396 Lisp_Object Qcoding_system_p, Qcoding_system_error; | 396 Lisp_Object Qcoding_system_p, Qcoding_system_error; |
397 | 397 |
398 /* Coding system emacs-mule and raw-text are for converting only | 398 /* Coding system emacs-mule and raw-text are for converting only |
399 end-of-line format. */ | 399 end-of-line format. */ |
400 Lisp_Object Qemacs_mule, Qraw_text; | 400 Lisp_Object Qemacs_mule, Qraw_text; |
401 | |
402 Lisp_Object Qutf_8; | |
401 | 403 |
402 /* Coding-systems are handed between Emacs Lisp programs and C internal | 404 /* Coding-systems are handed between Emacs Lisp programs and C internal |
403 routines by the following three variables. */ | 405 routines by the following three variables. */ |
404 /* Coding-system for reading files and receiving data from process. */ | 406 /* Coding-system for reading files and receiving data from process. */ |
405 Lisp_Object Vcoding_system_for_read; | 407 Lisp_Object Vcoding_system_for_read; |
7582 staticpro (&Qemacs_mule); | 7584 staticpro (&Qemacs_mule); |
7583 | 7585 |
7584 Qraw_text = intern ("raw-text"); | 7586 Qraw_text = intern ("raw-text"); |
7585 staticpro (&Qraw_text); | 7587 staticpro (&Qraw_text); |
7586 | 7588 |
7589 Qutf_8 = intern ("utf-8"); | |
7590 staticpro (&Qutf_8); | |
7591 | |
7587 defsubr (&Scoding_system_p); | 7592 defsubr (&Scoding_system_p); |
7588 defsubr (&Sread_coding_system); | 7593 defsubr (&Sread_coding_system); |
7589 defsubr (&Sread_non_nil_coding_system); | 7594 defsubr (&Sread_non_nil_coding_system); |
7590 defsubr (&Scheck_coding_system); | 7595 defsubr (&Scheck_coding_system); |
7591 defsubr (&Sdetect_coding_region); | 7596 defsubr (&Sdetect_coding_region); |