annotate etc/letter.xbm @ 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 9e3307668ce3
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
28798
9e3307668ce3 *** empty log message ***
Dave Love <fx@gnu.org>
parents:
diff changeset
1 #define letter_width 14
9e3307668ce3 *** empty log message ***
Dave Love <fx@gnu.org>
parents:
diff changeset
2 #define letter_height 10
9e3307668ce3 *** empty log message ***
Dave Love <fx@gnu.org>
parents:
diff changeset
3 static unsigned char letter_bits[] = {
9e3307668ce3 *** empty log message ***
Dave Love <fx@gnu.org>
parents:
diff changeset
4 0xff, 0x3f, 0x07, 0x38, 0x09, 0x24, 0x11, 0x22, 0xe1, 0x21, 0xd1, 0x22,
9e3307668ce3 *** empty log message ***
Dave Love <fx@gnu.org>
parents:
diff changeset
5 0x09, 0x24, 0x05, 0x28, 0x03, 0x30, 0xff, 0x3f};