Mercurial > emacs
annotate lisp/sb-dir.xpm @ 37853:93e5959b8a0e
Use SYMBOL_VALUE/SET_SYMBOL_VALUE.
(Qcyclic_variable_indirection): New variable.
(Fkeywordp): Check for internedness differently.
(Fmakunbound): Simplify the test if symbol is a constant.
(indirect_variable, Findirect_variable): New functions.
(swap_in_symval_forwarding): If SYMBOL is an alias, use the
aliased symbol.
(let_shadows_buffer_binding_p): Check for variable aliases.
(set_internal): Simplify the test if SYMBOL is a constant. If
SYMBOL has a buffer-local value and is an alias, use the aliased
symbol instead.
(syms_of_data): Initialze Qcyclic_variable_indirection and defsubr
Sindirect_variable.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Mon, 21 May 2001 12:23:19 +0000 |
parents | c0758fd9ca7a |
children | c2a09ac7b7b1 |
rev | line source |
---|---|
28974 | 1 /* XPM */ |
2 static char * sb_dir_xpm[] = { | |
3 "20 15 4 1", | |
4 " c None", | |
5 ". c #828282", | |
6 "+ c #000000", | |
7 "@ c #FFF993", | |
8 " ....... ", | |
9 ".+++++++. ", | |
10 ".+@@@@@@+.......... ", | |
11 ".+@@@@@@@++++++++++.", | |
12 ".+@@@@@@@@@@@@@@@@+.", | |
13 ".+@@@@@@@@@@@@@@@@+.", | |
14 ".+@@@@@@@@@@@@@@@@+.", | |
15 ".+@@@@@@@@@@@@@@@@+.", | |
16 ".+@@@@@@@@@@@@@@@@+.", | |
17 ".+@@@@@@@@@@@@@@@@+.", | |
18 ".+@@@@@@@@@@@@@@@@+.", | |
19 ".+@@@@@@@@@@@@@@@@+.", | |
20 ".+@@@@@@@@@@@@@@@@+.", | |
21 ".++++++++++++++++++.", | |
22 " .................. "}; |