Mercurial > hg > xemacs-beta
view src/gccache-x.h @ 5889:bd644055ef44
Correct a bug in #'check-type, non-setf'able PLACEs
lisp/ChangeLog addition:
2015-04-11 Aidan Kehoe <kehoea@parhasard.net>
* cl-macs.el:
* cl-macs.el (check-type):
Correct the sense of the type test here when PLACE is not
setf'able, something which gave confusing errors with literal
fixnums or, e.g., (+ 30 40).
tests/ChangeLog addition:
2015-04-11 Aidan Kehoe <kehoea@parhasard.net>
* automated/lisp-tests.el:
Check for a bug just fixed in cl-macs.el.
author | Aidan Kehoe <kehoea@parhasard.net> |
---|---|
date | Sat, 11 Apr 2015 18:06:17 +0100 |
parents | 308d34e9f07d |
children |
line wrap: on
line source
/* Efficient caching of X GCs (graphics contexts). Copyright (C) 1993 Free Software Foundation, Inc. This file is part of XEmacs. XEmacs 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. XEmacs is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with XEmacs. If not, see <http://www.gnu.org/licenses/>. */ /* Synched up with: Not in FSF. */ /* Written by jwz, 14 jun 93 */ #ifndef INCLUDED_gccache_x_h_ #define INCLUDED_gccache_x_h_ #include <X11/Xlib.h> struct gc_cache; struct gc_cache *make_gc_cache (Display *, Window); void free_gc_cache (struct gc_cache *cache); GC gc_cache_lookup (struct gc_cache *, XGCValues *, unsigned long mask); #define XE_GCONTEXT(cell) (XGContextFromGC(cell->gc)) #ifdef DEBUG_XEMACS void describe_gc_cache (struct gc_cache *cache, int flags); #define DGCCFLAG_DISABLE 0 #define DGCCFLAG_SUMMARY 1 << 0 #define DGCCFLAG_LIST_CELLS 1 << 1 #define DGCCFLAG_CELL_DETAILS 1 << 2 /* A combination of the flags above. */ #define DGCCFLAG_DEFAULT DGCCFLAG_SUMMARY | DGCCFLAG_LIST_CELLS #endif #endif /* INCLUDED_gccache_x_h_ */