comparison src/xterm.c @ 25692:121bd925411f

Don't continue #define args for benefit of old cc. (xt_action_hook): Indent #error for benefit of K&R cc.
author Dave Love <fx@gnu.org>
date Mon, 13 Sep 1999 19:10:19 +0000
parents f8543a6d88ca
children e2d5cd96727b
comparison
equal deleted inserted replaced
25691:815efc48a80b 25692:121bd925411f
4144 in that glyph row area. X is the current output position assigned 4144 in that glyph row area. X is the current output position assigned
4145 to the new glyph string constructed. HL overrides that face of the 4145 to the new glyph string constructed. HL overrides that face of the
4146 glyph; e.g. it is DRAW_CURSOR if a cursor has to be drawn. LAST_X 4146 glyph; e.g. it is DRAW_CURSOR if a cursor has to be drawn. LAST_X
4147 is the right-most x-position of the drawing area. */ 4147 is the right-most x-position of the drawing area. */
4148 4148
4149 #define BUILD_STRETCH_GLYPH_STRING(W, ROW, AREA, START, END, HEAD, TAIL, \ 4149 /* SunOS 4 bundled cc, barfed on continuations in the arg lists here
4150 HL, X, LAST_X) \ 4150 and below -- keep them on one line. */
4151 #define BUILD_STRETCH_GLYPH_STRING(W, ROW, AREA, START, END, HEAD, TAIL, HL, X, LAST_X) \
4151 do \ 4152 do \
4152 { \ 4153 { \
4153 s = (struct glyph_string *) alloca (sizeof *s); \ 4154 s = (struct glyph_string *) alloca (sizeof *s); \
4154 x_init_glyph_string (s, NULL, W, ROW, AREA, START, HL); \ 4155 x_init_glyph_string (s, NULL, W, ROW, AREA, START, HL); \
4155 x_fill_stretch_glyph_string (s); \ 4156 x_fill_stretch_glyph_string (s); \
4166 in that glyph row area. X is the current output position assigned 4167 in that glyph row area. X is the current output position assigned
4167 to the new glyph string constructed. HL overrides that face of the 4168 to the new glyph string constructed. HL overrides that face of the
4168 glyph; e.g. it is DRAW_CURSOR if a cursor has to be drawn. LAST_X 4169 glyph; e.g. it is DRAW_CURSOR if a cursor has to be drawn. LAST_X
4169 is the right-most x-position of the drawing area. */ 4170 is the right-most x-position of the drawing area. */
4170 4171
4171 #define BUILD_IMAGE_GLYPH_STRING(W, ROW, AREA, START, END, HEAD, TAIL, \ 4172 #define BUILD_IMAGE_GLYPH_STRING(W, ROW, AREA, START, END, HEAD, TAIL, HL, X, LAST_X) \
4172 HL, X, LAST_X) \
4173 do \ 4173 do \
4174 { \ 4174 { \
4175 s = (struct glyph_string *) alloca (sizeof *s); \ 4175 s = (struct glyph_string *) alloca (sizeof *s); \
4176 x_init_glyph_string (s, NULL, W, ROW, AREA, START, HL); \ 4176 x_init_glyph_string (s, NULL, W, ROW, AREA, START, HL); \
4177 x_fill_image_glyph_string (s); \ 4177 x_fill_image_glyph_string (s); \
4189 area. X is the current output position assigned to the new glyph 4189 area. X is the current output position assigned to the new glyph
4190 string constructed. HL overrides that face of the glyph; e.g. it 4190 string constructed. HL overrides that face of the glyph; e.g. it
4191 is DRAW_CURSOR if a cursor has to be drawn. LAST_X is the 4191 is DRAW_CURSOR if a cursor has to be drawn. LAST_X is the
4192 right-most x-position of the drawing area. */ 4192 right-most x-position of the drawing area. */
4193 4193
4194 #define BUILD_CHAR_GLYPH_STRINGS(W, ROW, AREA, START, END, HEAD, TAIL, HL, \ 4194 #define BUILD_CHAR_GLYPH_STRINGS(W, ROW, AREA, START, END, HEAD, TAIL, HL, X, LAST_X, OVERLAPS_P) \
4195 X, LAST_X, OVERLAPS_P) \
4196 do \ 4195 do \
4197 { \ 4196 { \
4198 int c, charset, face_id; \ 4197 int c, charset, face_id; \
4199 XChar2b *char2b; \ 4198 XChar2b *char2b; \
4200 \ 4199 \
4271 4270
4272 This is an ugly monster macro construct because we must use alloca 4271 This is an ugly monster macro construct because we must use alloca
4273 to allocate glyph strings (because x_draw_glyphs can be called 4272 to allocate glyph strings (because x_draw_glyphs can be called
4274 asynchronously). */ 4273 asynchronously). */
4275 4274
4276 #define BUILD_GLYPH_STRINGS(W, ROW, AREA, START, END, HEAD, TAIL, HL, \ 4275 #define BUILD_GLYPH_STRINGS(W, ROW, AREA, START, END, HEAD, TAIL, HL, X, LAST_X, OVERLAPS_P) \
4277 X, LAST_X, OVERLAPS_P) \
4278 do \ 4276 do \
4279 { \ 4277 { \
4280 HEAD = TAIL = NULL; \ 4278 HEAD = TAIL = NULL; \
4281 while (START < END) \ 4279 while (START < END) \
4282 { \ 4280 { \
7141 end_action = "Release"; 7139 end_action = "Release";
7142 #elif defined HAVE_XAW3D 7140 #elif defined HAVE_XAW3D
7143 scroll_bar_p = XtIsSubclass (widget, scrollbarWidgetClass); 7141 scroll_bar_p = XtIsSubclass (widget, scrollbarWidgetClass);
7144 end_action = "EndScroll"; 7142 end_action = "EndScroll";
7145 #else 7143 #else
7146 #error unknown scroll bar toolkit 7144 #error unknown scroll bar toolkit
7147 #endif /* HAVE_XAW3D */ 7145 #endif /* HAVE_XAW3D */
7148 7146
7149 /* Although LessTif uses XtTimeouts like Xaw3d, the timer hack to 7147 /* Although LessTif uses XtTimeouts like Xaw3d, the timer hack to
7150 let Xt timeouts be processed doesn't work. */ 7148 let Xt timeouts be processed doesn't work. */
7151 if (scroll_bar_p 7149 if (scroll_bar_p