comparison src/xterm.c @ 9101:1cd322ea379a

(x_scroll_bar_clear): Use type test macros.
author Karl Heuer <kwzh@gnu.org>
date Tue, 27 Sep 1994 00:24:27 +0000
parents cece83c47ca5
children 8ad448b29c1c
comparison
equal deleted inserted replaced
9100:7dacd83e0fe0 9101:1cd322ea379a
2976 x_scroll_bar_clear (f) 2976 x_scroll_bar_clear (f)
2977 FRAME_PTR f; 2977 FRAME_PTR f;
2978 { 2978 {
2979 Lisp_Object bar; 2979 Lisp_Object bar;
2980 2980
2981 for (bar = FRAME_SCROLL_BARS (f); 2981 for (bar = FRAME_SCROLL_BARS (f); VECTORP (bar);
2982 XTYPE (bar) == Lisp_Vector;
2983 bar = XSCROLL_BAR (bar)->next) 2982 bar = XSCROLL_BAR (bar)->next)
2984 XClearArea (x_current_display, SCROLL_BAR_X_WINDOW (XSCROLL_BAR (bar)), 2983 XClearArea (x_current_display, SCROLL_BAR_X_WINDOW (XSCROLL_BAR (bar)),
2985 0, 0, 0, 0, True); 2984 0, 0, 0, 0, True);
2986 } 2985 }
2987 2986