comparison src/intervals.h @ 83080:d4d5e54871ff

Trivial cleanups to get rid of GCC warnings. src/fontset.c (Fset_fontset_font): Removed unused variables. src/fringe.c (Ffringe_bitmaps_at_pos): Ditto. src/xdisp.c (Flookup_image_map, note_mode_line_or_margin_highlight): Ditto. src/xterm.c (x_detect_focus_change, x_calc_absolute_position): Ditto. src/intervals.h (compare_string_intervals): New declaration. src/intervals.h (NULL_INTERVAL_P): Shut up GCC warnings by casting the left side of the comma expression to void. src/lisp.h (CHECK): Ditto. src/keyboard.c (modify_event_symbol): Shut up GCC warning about format template type mismatch. git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-120
author Karoly Lorentey <lorentey@elte.hu>
date Fri, 19 Mar 2004 23:19:04 +0000
parents 8d8fae1e281a
children 3ec251523b3e
comparison
equal deleted inserted replaced
83079:5f17f5c40152 83080:d4d5e54871ff
83 #else 83 #else
84 #define INT_LISPLIKE(i) (BUFFERP ((Lisp_Object){(EMACS_INT)(i)}) \ 84 #define INT_LISPLIKE(i) (BUFFERP ((Lisp_Object){(EMACS_INT)(i)}) \
85 || STRINGP ((Lisp_Object){(EMACS_INT)(i)})) 85 || STRINGP ((Lisp_Object){(EMACS_INT)(i)}))
86 #endif 86 #endif
87 #define NULL_INTERVAL_P(i) \ 87 #define NULL_INTERVAL_P(i) \
88 (CHECK (!INT_LISPLIKE (i), "non-interval"), (i) == NULL_INTERVAL) 88 ((void)CHECK (!INT_LISPLIKE (i), "non-interval"), (i) == NULL_INTERVAL)
89 /* old #define NULL_INTERVAL_P(i) ((i) == NULL_INTERVAL || INT_LISPLIKE (i)) */ 89 /* old #define NULL_INTERVAL_P(i) ((i) == NULL_INTERVAL || INT_LISPLIKE (i)) */
90 90
91 /* True if this interval has no right child. */ 91 /* True if this interval has no right child. */
92 #define NULL_RIGHT_CHILD(i) ((i)->right == NULL_INTERVAL) 92 #define NULL_RIGHT_CHILD(i) ((i)->right == NULL_INTERVAL)
93 93
287 extern void verify_interval_modification P_ ((struct buffer *, int, int)); 287 extern void verify_interval_modification P_ ((struct buffer *, int, int));
288 extern INTERVAL balance_intervals P_ ((INTERVAL)); 288 extern INTERVAL balance_intervals P_ ((INTERVAL));
289 extern INLINE void copy_intervals_to_string P_ ((Lisp_Object, struct buffer *, 289 extern INLINE void copy_intervals_to_string P_ ((Lisp_Object, struct buffer *,
290 int, int)); 290 int, int));
291 extern INTERVAL copy_intervals P_ ((INTERVAL, int, int)); 291 extern INTERVAL copy_intervals P_ ((INTERVAL, int, int));
292 extern int compare_string_intervals P_ ((Lisp_Object s1, Lisp_Object s2));
292 extern Lisp_Object textget P_ ((Lisp_Object, Lisp_Object)); 293 extern Lisp_Object textget P_ ((Lisp_Object, Lisp_Object));
293 extern Lisp_Object lookup_char_property P_ ((Lisp_Object, Lisp_Object, int)); 294 extern Lisp_Object lookup_char_property P_ ((Lisp_Object, Lisp_Object, int));
294 extern void move_if_not_intangible P_ ((int)); 295 extern void move_if_not_intangible P_ ((int));
295 extern int get_property_and_range P_ ((int, Lisp_Object, Lisp_Object *, 296 extern int get_property_and_range P_ ((int, Lisp_Object, Lisp_Object *,
296 int *, int *, Lisp_Object)); 297 int *, int *, Lisp_Object));