Mercurial > emacs
view lisp/gnus/post.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 23 1", " c Gray0", ". c Gray6", "X c Gray12", "o c #2ff22ff22ff2", "O c #3fff3fff3fff", "+ c Gray28", "@ c #53ee53ee53ee", "# c #5fdf5fdf5fdf", "$ c #67e767e767e7", "% c #6fff6fff6fff", "& c #77f777f777f7", "* c #7bdb7bdb7bdb", "= c Gray50", "- c Gray56", "; c #9bd69bd69bd6", ": c #9fff9fff9fff", "> c #a7c7a7c7a7c7", ", c Gray70", "< c Gray75", "1 c Gray81", "2 c #dfffdfffdfff", "3 c #efffefffefff", "4 c Gray100", /* pixels */ ",><,><,><,><,><,><,><,><", ">-<>-<>-<>-<>-<>-<>-<>-<", "<<<<<<<<<<<<<<<<<<<<<<<<", ",><,><,><,>;*O.,><,><,><", ">-<>-<>-<-o&:4O#-<>-<>-<", "<<<<<<<<@@<31O:o<<<<<<<<", ",><,>;*O1444 X1@><,><,><", ">-<-o&:4444:=<4<#<>-<>-<", "<<<,+<4444414443&;<<<<<<", ",><,#;4444444444:*,><,><", ">-<>-o44444444444O>-<>-<", "<<<<<;%44444444441@<<<<<", ",><,><@24444444444@><,><", ">-<>-<-=4444444444<#<>-<", "<<<<<<,$14444444443&;<<<", ",><,><,#;4444444444:*,><", ">-<>-<>-o4444444444<X>-<", "<<<<<<<<;%4444444%O$-<<<", ",><,><,><@24444<&;,><,><", ">-<>-<>-<-=42==#-<>-<>-<", "<<<<<<<<<,$Oo+-<<<<<<<<<", ",><,><,><,><,><,><,><,><", ">-<>-<>-<>-<>-<>-<>-<>-<", "<<<<<<<<<<<<<<<<<<<<<<<<" };