Mercurial > emacs
comparison src/xfaces.c @ 65912:da86e1af8629
(x_create_gc, x_free_gc) [MAC_OS]: Add BLOCK_INPUT. Add debug code.
author | YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> |
---|---|
date | Sat, 08 Oct 2005 02:28:55 +0000 |
parents | d9e5cd5bce05 |
children | c52c20ff739f 08b4dd6a6e87 5e2d3828e89f |
comparison
equal
deleted
inserted
replaced
65911:a86e9a781ba7 | 65912:da86e1af8629 |
---|---|
788 struct frame *f; | 788 struct frame *f; |
789 unsigned long mask; | 789 unsigned long mask; |
790 XGCValues *xgcv; | 790 XGCValues *xgcv; |
791 { | 791 { |
792 GC gc; | 792 GC gc; |
793 BLOCK_INPUT; | |
793 gc = XCreateGC (FRAME_MAC_DISPLAY (f), FRAME_MAC_WINDOW (f), mask, xgcv); | 794 gc = XCreateGC (FRAME_MAC_DISPLAY (f), FRAME_MAC_WINDOW (f), mask, xgcv); |
795 UNBLOCK_INPUT; | |
796 IF_DEBUG (++ngcs); | |
794 return gc; | 797 return gc; |
795 } | 798 } |
796 | 799 |
797 static INLINE void | 800 static INLINE void |
798 x_free_gc (f, gc) | 801 x_free_gc (f, gc) |
799 struct frame *f; | 802 struct frame *f; |
800 GC gc; | 803 GC gc; |
801 { | 804 { |
805 BLOCK_INPUT; | |
806 IF_DEBUG (xassert (--ngcs >= 0)); | |
802 XFreeGC (FRAME_MAC_DISPLAY (f), gc); | 807 XFreeGC (FRAME_MAC_DISPLAY (f), gc); |
808 UNBLOCK_INPUT; | |
803 } | 809 } |
804 | 810 |
805 #endif /* MAC_OS */ | 811 #endif /* MAC_OS */ |
806 | 812 |
807 /* Like stricmp. Used to compare parts of font names which are in | 813 /* Like stricmp. Used to compare parts of font names which are in |