Mercurial > hg > xemacs-beta

comparison src/mule-coding.h @ 187:b405438285a2 r20-3b20

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b20
author cvs
date Mon, 13 Aug 2007 09:56:28 +0200
parents 3d6bfa290dbd
children 78f53ef88e17
comparison
equal deleted inserted replaced
186:24ac94803b48 187:b405438285a2
107 marking, rather than autodetecting it. These will only be non-nil 107 marking, rather than autodetecting it. These will only be non-nil
108 if (eol_type == EOL_AUTODETECT). */ 108 if (eol_type == EOL_AUTODETECT). */
109 Lisp_Object eol_lf, eol_crlf, eol_cr; 109 Lisp_Object eol_lf, eol_crlf, eol_cr;
110 110
111 struct 111 struct
112 { 112 {
113 /* What are the charsets to be initially designated to G0, G1, 113 /* What are the charsets to be initially designated to G0, G1,
114 G2, G3? If t, no charset is initially designated. If nil, 114 G2, G3? If t, no charset is initially designated. If nil,
115 no charset is initially designated and no charset is allowed 115 no charset is initially designated and no charset is allowed
116 to be designated. */ 116 to be designated. */
117 Lisp_Object initial_charset[4]; 117 Lisp_Object initial_charset[4];
118 118
119 /* If true, a designation escape sequence needs to be sent on output 119 /* If true, a designation escape sequence needs to be sent on output
120 for the charset in G[0-3] before that charset is used. */ 120 for the charset in G[0-3] before that charset is used. */
121 unsigned char force_charset_on_output[4]; 121 unsigned char force_charset_on_output[4];
122 122
123 charset_conversion_spec_dynarr *input_conv; 123 charset_conversion_spec_dynarr *input_conv;
124 charset_conversion_spec_dynarr *output_conv; 124 charset_conversion_spec_dynarr *output_conv;
125 125
126 unsigned int shoort :1; /* C makes you speak Dutch */ 126 unsigned int shoort :1; /* C makes you speak Dutch */
127 unsigned int no_ascii_eol :1; 127 unsigned int no_ascii_eol :1;
128 unsigned int no_ascii_cntl :1; 128 unsigned int no_ascii_cntl :1;
129 unsigned int seven :1; 129 unsigned int seven :1;
130 unsigned int lock_shift :1; 130 unsigned int lock_shift :1;
131 unsigned int no_iso6429 :1; 131 unsigned int no_iso6429 :1;
132 unsigned int escape_quoted :1; 132 unsigned int escape_quoted :1;
133 } iso2022; 133 } iso2022;
134 134
135 struct 135 struct
136 { 136 {
137 /* For a CCL coding system, these specify the CCL programs used for 137 /* For a CCL coding system, these specify the CCL programs used for
138 decoding (input) and encoding (output). */ 138 decoding (input) and encoding (output). */
139 Lisp_Object decode, encode; 139 Lisp_Object decode, encode;
140 } ccl; 140 } ccl;
141 }; 141 };
142 142
143 DECLARE_LRECORD (coding_system, struct Lisp_Coding_System); 143 DECLARE_LRECORD (coding_system, struct Lisp_Coding_System);
144 #define XCODING_SYSTEM(x) XRECORD (x, coding_system, struct Lisp_Coding_System) 144 #define XCODING_SYSTEM(x) XRECORD (x, coding_system, struct Lisp_Coding_System)
145 #define XSETCODING_SYSTEM(x, p) XSETRECORD (x, p, coding_system) 145 #define XSETCODING_SYSTEM(x, p) XSETRECORD (x, p, coding_system)