aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorJuanma Barranquero2009-02-11 09:45:12 +0000
committerJuanma Barranquero2009-02-11 09:45:12 +0000
commit8510724d46951d651a78424e12b93ccee100c665 (patch)
treeb04b98a8aa0cd962eac5de05dab0e81f120d3473 /src
parentabab01f2e81262d65221d02b0cf525679bd8b7a7 (diff)
downloademacs-8510724d46951d651a78424e12b93ccee100c665.tar.gz
emacs-8510724d46951d651a78424e12b93ccee100c665.zip
Remove spurious semicolons.
Diffstat (limited to 'src')
-rw-r--r--src/ChangeLog10
-rw-r--r--src/casetab.c2
-rw-r--r--src/coding.c2
-rw-r--r--src/font.c2
-rw-r--r--src/fontset.c6
-rw-r--r--src/ftfont.c4
-rw-r--r--src/xfont.c8
-rw-r--r--src/xftfont.c12
8 files changed, 28 insertions, 18 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index 5890ff9be13..40a6e875c5e 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,13 @@
12009-02-11 Juanma Barranquero <lekktu@gmail.com>
2
3 * casetab.c (init_casetab_once):
4 * coding.c (ALLOC_CONVERSION_WORK_AREA):
5 * font.c (font_update_lface):
6 * fontset.c (Fnew_fontset):
7 * ftfont.c (ftfont_drive_otf):
8 * xfont.c (xfont_open):
9 * xftfont.c (xftfont_get_xft_draw): Remove spurious semicolons.
10
12009-02-11 Stefan Monnier <monnier@iro.umontreal.ca> 112009-02-11 Stefan Monnier <monnier@iro.umontreal.ca>
2 12
3 * fileio.c (Fwrite_region): !NILP -> CONSP. 13 * fileio.c (Fwrite_region): !NILP -> CONSP.
diff --git a/src/casetab.c b/src/casetab.c
index 1a5d292a00f..423251df317 100644
--- a/src/casetab.c
+++ b/src/casetab.c
@@ -285,7 +285,7 @@ init_casetab_once ()
285 { 285 {
286 int c = ((i >= 'A' && i <= 'Z') ? i + ('a' - 'A') 286 int c = ((i >= 'A' && i <= 'Z') ? i + ('a' - 'A')
287 : ((i >= 'a' && i <= 'z') ? i + ('A' - 'a') 287 : ((i >= 'a' && i <= 'z') ? i + ('A' - 'a')
288 : i));; 288 : i));
289 CHAR_TABLE_SET (up, i, make_number (c)); 289 CHAR_TABLE_SET (up, i, make_number (c));
290 } 290 }
291 291
diff --git a/src/coding.c b/src/coding.c
index f05cf841f5a..abc7b3eca76 100644
--- a/src/coding.c
+++ b/src/coding.c
@@ -6626,7 +6626,7 @@ produce_charset (coding, charbuf, pos)
6626 6626
6627#define ALLOC_CONVERSION_WORK_AREA(coding) \ 6627#define ALLOC_CONVERSION_WORK_AREA(coding) \
6628 do { \ 6628 do { \
6629 int size = CHARBUF_SIZE;; \ 6629 int size = CHARBUF_SIZE; \
6630 \ 6630 \
6631 coding->charbuf = NULL; \ 6631 coding->charbuf = NULL; \
6632 while (size > 1024) \ 6632 while (size > 1024) \
diff --git a/src/font.c b/src/font.c
index c5920cc27ac..0bd18d4c5cd 100644
--- a/src/font.c
+++ b/src/font.c
@@ -3132,7 +3132,7 @@ font_update_lface (f, attrs)
3132 if (! NILP (AREF (spec, FONT_WEIGHT_INDEX))) 3132 if (! NILP (AREF (spec, FONT_WEIGHT_INDEX)))
3133 attrs[LFACE_WEIGHT_INDEX] = FONT_WEIGHT_FOR_FACE (spec); 3133 attrs[LFACE_WEIGHT_INDEX] = FONT_WEIGHT_FOR_FACE (spec);
3134 if (! NILP (AREF (spec, FONT_SLANT_INDEX))) 3134 if (! NILP (AREF (spec, FONT_SLANT_INDEX)))
3135 attrs[LFACE_SLANT_INDEX] = FONT_SLANT_FOR_FACE (spec);; 3135 attrs[LFACE_SLANT_INDEX] = FONT_SLANT_FOR_FACE (spec);
3136 if (! NILP (AREF (spec, FONT_WIDTH_INDEX))) 3136 if (! NILP (AREF (spec, FONT_WIDTH_INDEX)))
3137 attrs[LFACE_SWIDTH_INDEX] = FONT_WIDTH_FOR_FACE (spec); 3137 attrs[LFACE_SWIDTH_INDEX] = FONT_WIDTH_FOR_FACE (spec);
3138 if (! NILP (AREF (spec, FONT_SIZE_INDEX))) 3138 if (! NILP (AREF (spec, FONT_SIZE_INDEX)))
diff --git a/src/fontset.c b/src/fontset.c
index 701ab66e89e..03d093fa09d 100644
--- a/src/fontset.c
+++ b/src/fontset.c
@@ -1062,7 +1062,7 @@ fontset_pattern_regexp (pattern)
1062 nstars++; 1062 nstars++;
1063 else if (*p0 == '[' 1063 else if (*p0 == '['
1064 || *p0 == '.' || *p0 == '\\' 1064 || *p0 == '.' || *p0 == '\\'
1065 || *p0 == '+' || *p0 == '^' 1065 || *p0 == '+' || *p0 == '^'
1066 || *p0 == '$') 1066 || *p0 == '$')
1067 nescs++; 1067 nescs++;
1068 } 1068 }
@@ -1090,7 +1090,7 @@ fontset_pattern_regexp (pattern)
1090 *p1++ = '.'; 1090 *p1++ = '.';
1091 else if (*p0 == '[' 1091 else if (*p0 == '['
1092 || *p0 == '.' || *p0 == '\\' 1092 || *p0 == '.' || *p0 == '\\'
1093 || *p0 == '+' || *p0 == '^' 1093 || *p0 == '+' || *p0 == '^'
1094 || *p0 == '$') 1094 || *p0 == '$')
1095 *p1++ = '\\', *p1++ = *p0; 1095 *p1++ = '\\', *p1++ = *p0;
1096 else 1096 else
@@ -1619,7 +1619,7 @@ FONT-SPEC is a vector, a cons, or a string. See the documentation of
1619 } 1619 }
1620 else 1620 else
1621 { 1621 {
1622 fontset = FONTSET_FROM_ID (id);; 1622 fontset = FONTSET_FROM_ID (id);
1623 free_realized_fontsets (fontset); 1623 free_realized_fontsets (fontset);
1624 Fset_char_table_range (fontset, Qt, Qnil); 1624 Fset_char_table_range (fontset, Qt, Qnil);
1625 } 1625 }
diff --git a/src/ftfont.c b/src/ftfont.c
index dea3bf069b4..b8c39cd920d 100644
--- a/src/ftfont.c
+++ b/src/ftfont.c
@@ -1390,7 +1390,7 @@ ftfont_otf_features (gsub_gpos)
1390 sym = Qnil; 1390 sym = Qnil;
1391 langsyses = Fcons (Fcons (sym, features), langsyses); 1391 langsyses = Fcons (Fcons (sym, features), langsyses);
1392 } 1392 }
1393 1393
1394 OTF_TAG_SYM (sym, gsub_gpos->ScriptList.Script[i].ScriptTag); 1394 OTF_TAG_SYM (sym, gsub_gpos->ScriptList.Script[i].ScriptTag);
1395 scripts = Fcons (Fcons (sym, langsyses), scripts); 1395 scripts = Fcons (Fcons (sym, langsyses), scripts);
1396 } 1396 }
@@ -1778,7 +1778,7 @@ ftfont_drive_otf (font, spec, in, from, to, out, adjustment)
1778 base_x = otfg->f.f4.base_anchor->XCoordinate * x_scale / 0x10000; 1778 base_x = otfg->f.f4.base_anchor->XCoordinate * x_scale / 0x10000;
1779 base_y = otfg->f.f4.base_anchor->YCoordinate * y_scale / 0x10000; 1779 base_y = otfg->f.f4.base_anchor->YCoordinate * y_scale / 0x10000;
1780 mark_x = otfg->f.f4.mark_anchor->XCoordinate * x_scale / 0x10000; 1780 mark_x = otfg->f.f4.mark_anchor->XCoordinate * x_scale / 0x10000;
1781 mark_y = otfg->f.f4.mark_anchor->YCoordinate * y_scale / 0x10000;; 1781 mark_y = otfg->f.f4.mark_anchor->YCoordinate * y_scale / 0x10000;
1782 1782
1783 if (otfg->f.f4.base_anchor->AnchorFormat != 1) 1783 if (otfg->f.f4.base_anchor->AnchorFormat != 1)
1784 adjust_anchor (ft_face, otfg->f.f4.base_anchor, 1784 adjust_anchor (ft_face, otfg->f.f4.base_anchor,
diff --git a/src/xfont.c b/src/xfont.c
index 140686272c4..6a9a46ec35e 100644
--- a/src/xfont.c
+++ b/src/xfont.c
@@ -220,7 +220,7 @@ xfont_decode_coding_xlfd (char *xlfd, int len, char *output)
220{ 220{
221 char *p0 = xlfd, *p1 = output; 221 char *p0 = xlfd, *p1 = output;
222 int c; 222 int c;
223 223
224 while (*p0) 224 while (*p0)
225 { 225 {
226 c = *(unsigned char *) p0++; 226 c = *(unsigned char *) p0++;
@@ -242,7 +242,7 @@ xfont_encode_coding_xlfd (char *xlfd)
242 const unsigned char *p0 = (unsigned char *) xlfd; 242 const unsigned char *p0 = (unsigned char *) xlfd;
243 unsigned char *p1 = (unsigned char *) xlfd; 243 unsigned char *p1 = (unsigned char *) xlfd;
244 int len = 0; 244 int len = 0;
245 245
246 while (*p0) 246 while (*p0)
247 { 247 {
248 int c = STRING_CHAR_ADVANCE (p0); 248 int c = STRING_CHAR_ADVANCE (p0);
@@ -363,7 +363,7 @@ xfont_list (frame, spec)
363 int len; 363 int len;
364 /* Large enough to contain the longest XLFD (255 bytes) in UTF-8. */ 364 /* Large enough to contain the longest XLFD (255 bytes) in UTF-8. */
365 char name[512]; 365 char name[512];
366 366
367 extra = AREF (spec, FONT_EXTRA_INDEX); 367 extra = AREF (spec, FONT_EXTRA_INDEX);
368 if (CONSP (extra)) 368 if (CONSP (extra))
369 { 369 {
@@ -642,7 +642,7 @@ xfont_open (f, entity, pixel_size)
642 char *p0, *p; 642 char *p0, *p;
643 int dashes = 0; 643 int dashes = 0;
644 644
645 p0 = p = (char *) XGetAtomName (FRAME_X_DISPLAY (f), (Atom) value);; 645 p0 = p = (char *) XGetAtomName (FRAME_X_DISPLAY (f), (Atom) value);
646 /* Count the number of dashes in the "full name". 646 /* Count the number of dashes in the "full name".
647 If it is too few, this isn't really the font's full name, 647 If it is too few, this isn't really the font's full name,
648 so don't use it. 648 so don't use it.
diff --git a/src/xftfont.c b/src/xftfont.c
index aecf6497428..9474283c218 100644
--- a/src/xftfont.c
+++ b/src/xftfont.c
@@ -159,7 +159,7 @@ xftfont_list (frame, spec)
159 Lisp_Object spec; 159 Lisp_Object spec;
160{ 160{
161 Lisp_Object list = ftfont_driver.list (frame, spec), tail; 161 Lisp_Object list = ftfont_driver.list (frame, spec), tail;
162 162
163 for (tail = list; CONSP (tail); tail = XCDR (tail)) 163 for (tail = list; CONSP (tail); tail = XCDR (tail))
164 ASET (XCAR (tail), FONT_TYPE_INDEX, Qxft); 164 ASET (XCAR (tail), FONT_TYPE_INDEX, Qxft);
165 return list; 165 return list;
@@ -271,7 +271,7 @@ xftfont_open (f, entity, pixel_size)
271 271
272 FcPatternAddString (pat, FC_FILE, (FcChar8 *) SDATA (filename)); 272 FcPatternAddString (pat, FC_FILE, (FcChar8 *) SDATA (filename));
273 FcPatternAddInteger (pat, FC_INDEX, XINT (index)); 273 FcPatternAddInteger (pat, FC_INDEX, XINT (index));
274 274
275 275
276 BLOCK_INPUT; 276 BLOCK_INPUT;
277 match = XftFontMatch (display, FRAME_X_SCREEN_NUMBER (f), pat, &result); 277 match = XftFontMatch (display, FRAME_X_SCREEN_NUMBER (f), pat, &result);
@@ -335,7 +335,7 @@ xftfont_open (f, entity, pixel_size)
335 font->space_width = extents.xOff; 335 font->space_width = extents.xOff;
336 if (font->space_width <= 0) 336 if (font->space_width <= 0)
337 /* dirty workaround */ 337 /* dirty workaround */
338 font->space_width = pixel_size; 338 font->space_width = pixel_size;
339 XftTextExtents8 (display, xftfont, ascii_printable + 1, 94, &extents); 339 XftTextExtents8 (display, xftfont, ascii_printable + 1, 94, &extents);
340 font->average_width = (font->space_width + extents.xOff) / 95; 340 font->average_width = (font->space_width + extents.xOff) / 95;
341 } 341 }
@@ -451,7 +451,7 @@ xftfont_done_face (f, face)
451 struct face *face; 451 struct face *face;
452{ 452{
453 struct xftface_info *xftface_info; 453 struct xftface_info *xftface_info;
454 454
455#if 0 455#if 0
456 /* This doesn't work if face->ascii_face doesn't use an Xft font. */ 456 /* This doesn't work if face->ascii_face doesn't use an Xft font. */
457 if (face != face->ascii_face 457 if (face != face->ascii_face
@@ -490,7 +490,7 @@ xftfont_encode_char (font, c)
490 struct xftfont_info *xftfont_info = (struct xftfont_info *) font; 490 struct xftfont_info *xftfont_info = (struct xftfont_info *) font;
491 unsigned code = XftCharIndex (xftfont_info->display, xftfont_info->xftfont, 491 unsigned code = XftCharIndex (xftfont_info->display, xftfont_info->xftfont,
492 (FcChar32) c); 492 (FcChar32) c);
493 493
494 return (code ? code : FONT_INVALID_CODE); 494 return (code ? code : FONT_INVALID_CODE);
495} 495}
496 496
@@ -523,7 +523,7 @@ static XftDraw *
523xftfont_get_xft_draw (f) 523xftfont_get_xft_draw (f)
524 FRAME_PTR f; 524 FRAME_PTR f;
525{ 525{
526 XftDraw *xft_draw = font_get_frame_data (f, &xftfont_driver);; 526 XftDraw *xft_draw = font_get_frame_data (f, &xftfont_driver);
527 527
528 if (! xft_draw) 528 if (! xft_draw)
529 { 529 {