Mercurial > emacs
view lisp/gnus/rot13.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 | 354a5b33d058 |
children | 55fd4f77387a |
line wrap: on
line source
/* XPM */ static char *magick[] = { /* columns rows colors chars-per-pixel */ "24 24 20 1", " c Gray0", ". c Gray6", "X c Gray12", "o c #2ff52ff52ff5", "O c #3fff3fff3fff", "+ c Gray28", "@ c #53e353e353e3", "# c #5fe45fe45fe4", "$ c #67e767e767e7", "% c #6fff6fff6fff", "& c #77d777d777d7", "* c Gray50", "= c Gray56", "- c #9fff9fff9fff", "; c Gray70", ": c Gray75", "> c Gray81", ", c #dfffdfffdfff", "< c #efffefffefff", "1 c Gray100", /* pixels */ "::::::::::::::::::::::::", "::::::::::::::::::::::::", "::::::::::::::::::::::::", "::::#oOOOOOOOOOo+;::::::", "::::#:,*,,**11-#O$::::::", "::::#:#:#:#:%--=*>@:::::", "::::#:o:o:*%>*:>OOo#::::", "::::#:X*X:O*-:**:1:#::::", "::::#:>1><::11>:,1:#::::", "::::#:>-111%111%11:#::::", "::::#:*:-1:*1:*-11:#::::", "::::#: *O>*:%*=--1:#::::", "::::#:O* :*1O*o%11:#::::", "::::#:O:X,**-*:111:#::::", "::::#:>1>1,:1,<111:#::::", "::::#:1,oo,1111111:#::::", "::::#:,O##O*****:1:#::::", "::::#:: :: *1:#::::", "::::#:1-..-1:*O:*1:#::::", "::::#:11--11,:O,:1:#::::", "::::#:11111111>111:#::::", "::::&oooooooooooooo&::::", "::::::::::::::::::::::::", "::::::::::::::::::::::::" };