aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorSam Steingold2001-12-17 15:21:06 +0000
committerSam Steingold2001-12-17 15:21:06 +0000
commit93dec0196becfb2d190dcd3c5eca1715388c6b9f (patch)
tree21a9c03ef3920269a31c295f921148e71702e9f0 /src
parentc8446041d5248f2cba5b0252421213230ec37903 (diff)
downloademacs-93dec0196becfb2d190dcd3c5eca1715388c6b9f.tar.gz
emacs-93dec0196becfb2d190dcd3c5eca1715388c6b9f.zip
(DECODE_COMPOSITION_END): Fixed a typo in the last
patch (COMPOSING_P, not COMPOSING).
Diffstat (limited to 'src')
-rw-r--r--src/ChangeLog7
-rw-r--r--src/coding.c42
2 files changed, 27 insertions, 22 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index 8e9e4fef1c0..25795977b96 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
12001-12-17 Sam Steingold <sds@gnu.org>
2
3 * coding.c (DECODE_COMPOSITION_END): Fixed a typo in the last
4 patch (COMPOSING_P, not COMPOSING).
5
12001-12-17 Richard M. Stallman <rms@gnu.org> 62001-12-17 Richard M. Stallman <rms@gnu.org>
2 7
3 * coding.c (DECODE_COMPOSITION_END): Check for ! COMPOSING (coding) 8 * coding.c (DECODE_COMPOSITION_END): Check for ! COMPOSING (coding)
@@ -491,7 +496,7 @@
491 (w32_wnd_proc) <WM_MENUSELECT>: Show help echo directly. 496 (w32_wnd_proc) <WM_MENUSELECT>: Show help echo directly.
492 (my_create_tip_window): New function. 497 (my_create_tip_window): New function.
493 (x_create_tip_frame, compute_tip_xy): Adapt for Windows. 498 (x_create_tip_frame, compute_tip_xy): Adapt for Windows.
494 (Fx_show_tip, Fx_hide_tip) [TEST_TOOLTIPS]: Adapt for Windows. 499 (Fx_show_tip, Fx_hide_tip) [TEST_TOOLTIPS]: Adapt for Windows.
495 500
4962001-11-20 Jason Rumney <jasonr@gnu.org> 5012001-11-20 Jason Rumney <jasonr@gnu.org>
497 502
diff --git a/src/coding.c b/src/coding.c
index 9c45a65ff88..6083af6eabc 100644
--- a/src/coding.c
+++ b/src/coding.c
@@ -60,7 +60,7 @@ Boston, MA 02111-1307, USA. */
60 all variants of ISO2022. Details are described in section 3. 60 all variants of ISO2022. Details are described in section 3.
61 61
62 2. SJIS (or Shift-JIS or MS-Kanji-Code) 62 2. SJIS (or Shift-JIS or MS-Kanji-Code)
63 63
64 A coding system to encode character sets: ASCII, JISX0201, and 64 A coding system to encode character sets: ASCII, JISX0201, and
65 JISX0208. Widely used for PC's in Japan. Details are described in 65 JISX0208. Widely used for PC's in Japan. Details are described in
66 section 4. 66 section 4.
@@ -503,7 +503,7 @@ coding_safe_chars (coding)
503 struct coding_system *coding; 503 struct coding_system *coding;
504{ 504{
505 Lisp_Object coding_spec, plist, safe_chars; 505 Lisp_Object coding_spec, plist, safe_chars;
506 506
507 coding_spec = Fget (coding->symbol, Qcoding_system); 507 coding_spec = Fget (coding->symbol, Qcoding_system);
508 plist = XVECTOR (coding_spec)->contents[3]; 508 plist = XVECTOR (coding_spec)->contents[3];
509 safe_chars = Fplist_get (XVECTOR (coding_spec)->contents[3], Qsafe_chars); 509 safe_chars = Fplist_get (XVECTOR (coding_spec)->contents[3], Qsafe_chars);
@@ -889,7 +889,7 @@ decode_composition_emacs_mule (coding, src, src_end,
889 CODING_ADD_COMPOSITION_START (coding, coding->produced_char, method); 889 CODING_ADD_COMPOSITION_START (coding, coding->produced_char, method);
890 for (i = 0; i < ncomponent; i++) 890 for (i = 0; i < ncomponent; i++)
891 CODING_ADD_COMPOSITION_COMPONENT (coding, component[i]); 891 CODING_ADD_COMPOSITION_COMPONENT (coding, component[i]);
892 CODING_ADD_COMPOSITION_END (coding, coding->produced_char + nchars); 892 CODING_ADD_COMPOSITION_END (coding, coding->produced_char + nchars);
893 if (buf < bufp) 893 if (buf < bufp)
894 { 894 {
895 unsigned char *p = buf; 895 unsigned char *p = buf;
@@ -1055,7 +1055,7 @@ decode_coding_emacs_mule (coding, source, destination, src_bytes, dst_bytes)
1055 coding->cmp_data_start = 0; \ 1055 coding->cmp_data_start = 0; \
1056 } \ 1056 } \
1057 } while (0) 1057 } while (0)
1058 1058
1059 1059
1060static void encode_eol P_ ((struct coding_system *, unsigned char *, 1060static void encode_eol P_ ((struct coding_system *, unsigned char *,
1061 unsigned char *, int, int)); 1061 unsigned char *, int, int));
@@ -1433,7 +1433,7 @@ detect_coding_iso2022 (src, src_end, multibytep)
1433 mask_found |= CODING_CATEGORY_MASK_ISO_SHIFT; 1433 mask_found |= CODING_CATEGORY_MASK_ISO_SHIFT;
1434 } 1434 }
1435 break; 1435 break;
1436 1436
1437 case ISO_CODE_SI: 1437 case ISO_CODE_SI:
1438 if (inhibit_iso_escape_detection) 1438 if (inhibit_iso_escape_detection)
1439 break; 1439 break;
@@ -1665,7 +1665,7 @@ coding_allocate_composition_data (coding, char_offset)
1665 1665
1666#define DECODE_COMPOSITION_END(c1) \ 1666#define DECODE_COMPOSITION_END(c1) \
1667 do { \ 1667 do { \
1668 if (! COMPOSING (coding)) \ 1668 if (! COMPOSING_P (coding)) \
1669 { \ 1669 { \
1670 *dst++ = ISO_CODE_ESC; \ 1670 *dst++ = ISO_CODE_ESC; \
1671 *dst++ = c1; \ 1671 *dst++ = c1; \
@@ -2439,7 +2439,7 @@ encode_designation_at_bol (coding, translation_table, src, src_end, dst)
2439 ONE_MORE_CHAR (c); 2439 ONE_MORE_CHAR (c);
2440 if (c == '\n') 2440 if (c == '\n')
2441 break; 2441 break;
2442 2442
2443 charset = CHAR_CHARSET (c); 2443 charset = CHAR_CHARSET (c);
2444 reg = CODING_SPEC_ISO_REQUESTED_DESIGNATION (coding, charset); 2444 reg = CODING_SPEC_ISO_REQUESTED_DESIGNATION (coding, charset);
2445 if (reg != CODING_SPEC_ISO_NO_REQUESTED_DESIGNATION && r[reg] < 0) 2445 if (reg != CODING_SPEC_ISO_NO_REQUESTED_DESIGNATION && r[reg] < 0)
@@ -2609,7 +2609,7 @@ encode_coding_iso2022 (coding, source, destination, src_bytes, dst_bytes)
2609 *dst++ = ISO_CODE_CR; 2609 *dst++ = ISO_CODE_CR;
2610 CODING_SPEC_ISO_BOL (coding) = 1; 2610 CODING_SPEC_ISO_BOL (coding) = 1;
2611 } 2611 }
2612 else 2612 else
2613 { 2613 {
2614 if (coding->flags & CODING_FLAG_ISO_RESET_AT_CNTL) 2614 if (coding->flags & CODING_FLAG_ISO_RESET_AT_CNTL)
2615 ENCODE_RESET_PLANE_AND_REGISTER; 2615 ENCODE_RESET_PLANE_AND_REGISTER;
@@ -3032,7 +3032,7 @@ encode_coding_sjis_big5 (coding, source, destination,
3032 3032
3033 src_base = src; 3033 src_base = src;
3034 ONE_MORE_CHAR (c); 3034 ONE_MORE_CHAR (c);
3035 3035
3036 /* Now encode the character C. */ 3036 /* Now encode the character C. */
3037 if (SINGLE_BYTE_CHAR_P (c)) 3037 if (SINGLE_BYTE_CHAR_P (c))
3038 { 3038 {
@@ -3357,7 +3357,7 @@ encode_eol (coding, source, destination, src_bytes, dst_bytes)
3357 3357
3358 If the value is nil, graphic register N is never used on 3358 If the value is nil, graphic register N is never used on
3359 encoding. 3359 encoding.
3360 3360
3361 sub-element[N] where N is 4 through 11: to be set in `coding->flags' 3361 sub-element[N] where N is 4 through 11: to be set in `coding->flags'
3362 Each value takes t or nil. See the section ISO2022 of 3362 Each value takes t or nil. See the section ISO2022 of
3363 `coding.h' for more information. 3363 `coding.h' for more information.
@@ -3481,7 +3481,7 @@ setup_coding_system (coding_system, coding)
3481 } 3481 }
3482 else 3482 else
3483 goto label_invalid_coding_system; 3483 goto label_invalid_coding_system;
3484 3484
3485 /* If the coding system has non-nil `composition' property, enable 3485 /* If the coding system has non-nil `composition' property, enable
3486 composition handling. */ 3486 composition handling. */
3487 val = Fplist_get (plist, Qcomposition); 3487 val = Fplist_get (plist, Qcomposition);
@@ -3621,7 +3621,7 @@ setup_coding_system (coding_system, coding)
3621 } 3621 }
3622 else 3622 else
3623 CODING_SPEC_ISO_INITIAL_DESIGNATION (coding, i) = -1; 3623 CODING_SPEC_ISO_INITIAL_DESIGNATION (coding, i) = -1;
3624 3624
3625 CODING_SPEC_ISO_DESIGNATION (coding, i) 3625 CODING_SPEC_ISO_DESIGNATION (coding, i)
3626 = CODING_SPEC_ISO_INITIAL_DESIGNATION (coding, i); 3626 = CODING_SPEC_ISO_INITIAL_DESIGNATION (coding, i);
3627 } 3627 }
@@ -3994,7 +3994,7 @@ detect_coding_mask (source, src_bytes, priorities, skip, multibytep)
3994 | CODING_CATEGORY_MASK_UTF_16_LE); 3994 | CODING_CATEGORY_MASK_UTF_16_LE);
3995 3995
3996 /* Or, if C is a special latin extra code, 3996 /* Or, if C is a special latin extra code,
3997 or is an ISO2022 specific control code of C1 (SS2 or SS3), 3997 or is an ISO2022 specific control code of C1 (SS2 or SS3),
3998 or is an ISO2022 control-sequence-introducer (CSI), 3998 or is an ISO2022 control-sequence-introducer (CSI),
3999 we should also consider the possibility of ISO2022 codings. */ 3999 we should also consider the possibility of ISO2022 codings. */
4000 if ((VECTORP (Vlatin_extra_code_table) 4000 if ((VECTORP (Vlatin_extra_code_table)
@@ -5101,7 +5101,7 @@ shrink_encoding_region (beg, end, coding, str)
5101 break; 5101 break;
5102 if (coding->flags & CODING_FLAG_ISO_DESIGNATE_AT_BOL) 5102 if (coding->flags & CODING_FLAG_ISO_DESIGNATE_AT_BOL)
5103 { 5103 {
5104 unsigned char *bol = begp; 5104 unsigned char *bol = begp;
5105 while (begp < endp && *begp < 0x80) 5105 while (begp < endp && *begp < 0x80)
5106 { 5106 {
5107 begp++; 5107 begp++;
@@ -5599,7 +5599,7 @@ code_convert_region (from, from_byte, to, to_byte, coding, encodep, replace)
5599 coding->symbol = XVECTOR (eol_type)->contents[CODING_EOL_LF]; 5599 coding->symbol = XVECTOR (eol_type)->contents[CODING_EOL_LF];
5600 else 5600 else
5601 coding->symbol = saved_coding_symbol; 5601 coding->symbol = saved_coding_symbol;
5602 5602
5603 continue; 5603 continue;
5604 } 5604 }
5605 if (len_byte <= 0) 5605 if (len_byte <= 0)
@@ -5617,7 +5617,7 @@ code_convert_region (from, from_byte, to, to_byte, coding, encodep, replace)
5617 if (multibyte_p) 5617 if (multibyte_p)
5618 { 5618 {
5619 unsigned char *start = dst; 5619 unsigned char *start = dst;
5620 5620
5621 inserted += len_byte; 5621 inserted += len_byte;
5622 while (len_byte--) 5622 while (len_byte--)
5623 { 5623 {
@@ -5700,7 +5700,7 @@ code_convert_region (from, from_byte, to, to_byte, coding, encodep, replace)
5700 inserted_byte = str_to_multibyte (GPT_ADDR, GAP_SIZE, inserted_byte); 5700 inserted_byte = str_to_multibyte (GPT_ADDR, GAP_SIZE, inserted_byte);
5701 } 5701 }
5702 5702
5703 /* If we shrank the conversion area, adjust it now. */ 5703 /* If we shrank the conversion area, adjust it now. */
5704 if (total_skip > 0) 5704 if (total_skip > 0)
5705 { 5705 {
5706 if (tail_skip > 0) 5706 if (tail_skip > 0)
@@ -5942,7 +5942,7 @@ decode_coding_string (str, coding, nocopy)
5942 } 5942 }
5943 produced += num_eol; 5943 produced += num_eol;
5944 produced_char += num_eol; 5944 produced_char += num_eol;
5945 } 5945 }
5946 /* Suppress eol-format conversion in the further conversion. */ 5946 /* Suppress eol-format conversion in the further conversion. */
5947 coding->eol_type = CODING_EOL_LF; 5947 coding->eol_type = CODING_EOL_LF;
5948 5948
@@ -6212,7 +6212,7 @@ detect_coding_system (src, src_bytes, highest, multibytep)
6212 } 6212 }
6213 } 6213 }
6214 return (highest ? XCAR (val) : val); 6214 return (highest ? XCAR (val) : val);
6215} 6215}
6216 6216
6217DEFUN ("detect-coding-region", Fdetect_coding_region, Sdetect_coding_region, 6217DEFUN ("detect-coding-region", Fdetect_coding_region, Sdetect_coding_region,
6218 2, 3, 0, 6218 2, 3, 0,
@@ -6408,7 +6408,7 @@ DEFUN ("find-coding-systems-region-internal",
6408 for (p = p1; p < p1end && ASCII_BYTE_P (*p); p++); 6408 for (p = p1; p < p1end && ASCII_BYTE_P (*p); p++);
6409 if (p == p1end) 6409 if (p == p1end)
6410 { 6410 {
6411 for (p = p2; p < p2end && ASCII_BYTE_P (*p); p++); 6411 for (p = p2; p < p2end && ASCII_BYTE_P (*p); p++);
6412 if (p == p2end) 6412 if (p == p2end)
6413 return Qt; 6413 return Qt;
6414 } 6414 }
@@ -6940,7 +6940,7 @@ init_coding_once ()
6940{ 6940{
6941 int i; 6941 int i;
6942 6942
6943 /* Emacs' internal format specific initialize routine. */ 6943 /* Emacs' internal format specific initialize routine. */
6944 for (i = 0; i <= 0x20; i++) 6944 for (i = 0; i <= 0x20; i++)
6945 emacs_code_class[i] = EMACS_control_code; 6945 emacs_code_class[i] = EMACS_control_code;
6946 emacs_code_class[0x0A] = EMACS_linefeed_code; 6946 emacs_code_class[0x0A] = EMACS_linefeed_code;