X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/5244bc019bf7376caff3bb198ff674e0ad9fb0e6..0a2aedfe6d650e825a50f25f972bac20d669f5cb:/src/disptab.h diff --git a/src/disptab.h b/src/disptab.h index 2e041707ee..964162f421 100644 --- a/src/disptab.h +++ b/src/disptab.h @@ -1,12 +1,12 @@ /* Things for GLYPHS and glyph tables. - Copyright (C) 1993, 2001-2012 Free Software Foundation, Inc. + Copyright (C) 1993, 2001-2016 Free Software Foundation, Inc. This file is part of GNU Emacs. GNU Emacs is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by -the Free Software Foundation, either version 3 of the License, or -(at your option) any later version. +the Free Software Foundation, either version 3 of the License, or (at +your option) any later version. GNU Emacs is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of @@ -18,6 +18,11 @@ along with GNU Emacs. If not, see . */ /* Access the slots of a display-table, according to their purpose. */ +#ifndef EMACS_DISPTAB_H +#define EMACS_DISPTAB_H + +#include "lisp.h" + #define DISP_TABLE_P(obj) \ (CHAR_TABLE_P (obj) \ && EQ (XCHAR_TABLE (obj)->purpose, Qdisplay_table) \ @@ -48,9 +53,6 @@ extern struct Lisp_Char_Table *window_display_table (struct window *); /* Defined in indent.c. */ extern struct Lisp_Char_Table *buffer_display_table (void); -/* This is the `purpose' slot of a display table. */ -extern Lisp_Object Qdisplay_table; - /* Return the current length of the GLYPH table, or 0 if the table isn't currently valid. */ #define GLYPH_TABLE_LENGTH \ @@ -80,7 +82,7 @@ extern Lisp_Object Qdisplay_table; SET_GLYPH_CHAR ((g), XINT ((base)[GLYPH_CHAR (g)])); \ if (!GLYPH_CHAR_VALID_P (g)) \ SET_GLYPH_CHAR (g, ' '); \ - } while (0) + } while (false) /* Assuming that GLYPH_SIMPLE_P (BASE, LEN, G) is 0, return the length and the address of the character-sequence @@ -95,3 +97,5 @@ extern Lisp_Object Qdisplay_table; #define SET_GLYPH_FROM_CHAR(glyph, c) \ SET_GLYPH (glyph, c, DEFAULT_FACE_ID) + +#endif /* EMACS_DISPTAB_H */