Mercurial > emacs
comparison src/syntax.c @ 20704:10eb136ca94b
(skip_chars): Use unibyte_char_to_multibyte,
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 21 Jan 1998 22:02:05 +0000 |
| parents | fa7d4c0ee36c |
| children | 92c662c4ab0e |
comparison
equal
deleted
inserted
replaced
| 20703:f465da76f36b | 20704:10eb136ca94b |
|---|---|
| 1 /* GNU Emacs routines to deal with syntax tables; also word and list parsing. | 1 /* GNU Emacs routines to deal with syntax tables; also word and list parsing. |
| 2 Copyright (C) 1985, 87, 93, 94, 95, 1997 Free Software Foundation, Inc. | 2 Copyright (C) 1985, 87, 93, 94, 95, 97, 1998 Free Software Foundation, Inc. |
| 3 | 3 |
| 4 This file is part of GNU Emacs. | 4 This file is part of GNU Emacs. |
| 5 | 5 |
| 6 GNU Emacs is free software; you can redistribute it and/or modify | 6 GNU Emacs is free software; you can redistribute it and/or modify |
| 7 it under the terms of the GNU General Public License as published by | 7 it under the terms of the GNU General Public License as published by |
| 1258 c = c_leading_code = XSTRING (string)->data[i++]; | 1258 c = c_leading_code = XSTRING (string)->data[i++]; |
| 1259 | 1259 |
| 1260 /* Convert multibyteness between what the string has | 1260 /* Convert multibyteness between what the string has |
| 1261 and what the buffer has. */ | 1261 and what the buffer has. */ |
| 1262 if (multibyte) | 1262 if (multibyte) |
| 1263 { | 1263 c = unibyte_char_to_multibyte (c); |
| 1264 if (c >= 0200 && c < 0400) | |
| 1265 c += nonascii_insert_offset; | |
| 1266 } | |
| 1267 else | 1264 else |
| 1268 c &= 0377; | 1265 c &= 0377; |
| 1269 | 1266 |
| 1270 if (syntaxp) | 1267 if (syntaxp) |
| 1271 fastmap[syntax_spec_code[c & 0377]] = 1; | 1268 fastmap[syntax_spec_code[c & 0377]] = 1; |