emacs/src, branch old-branches/gerd_defvaralias Emacs is the extensible, customizable, self-documenting real-time display editor. *** empty log message *** 2001-05-29T11:10:47+00:00 Gerd Moellmann 2001-05-29T11:10:47+00:00 1cda365bcc8ffdc03ea705be1ca0860e56149944 






*** empty log message ***
2001-05-21T12:40:16+00:00

Gerd Moellmann

2001-05-21T12:40:16+00:00

8bc7ee457d61cbb5b5cabb06d9d06797e784c691












Use SYMBOL_VALUE/ SET_SYMBOL_VALUE macros instead of accessing
2001-05-21T12:34:11+00:00

Gerd Moellmann

2001-05-21T12:34:11+00:00

22baa6b23b0aaa1ebca9a6b3b46f3560ba22bc5f

symbols' value directly.





symbols' value directly.







(Fmake_symbol): Adapt to changes of struct Lisp_Symbol.
2001-05-21T12:28:26+00:00

Gerd Moellmann

2001-05-21T12:28:26+00:00

e41ec733fe54358d92f38d0d0a9bf424169d9d1e












(Fbyte_code) <varref>: Use SYMBOL_VALUE.
2001-05-21T12:23:34+00:00

Gerd Moellmann

2001-05-21T12:23:34+00:00

5e6b030e97d3c8ed9bd91d0254ff737f13c2d073

(Fbyte_code) <varset>: Simplify the test if symbol's value can be
set directly.





(Fbyte_code) <varset>: Simplify the test if symbol's value can be
set directly.







Use SYMBOL_VALUE/SET_SYMBOL_VALUE.
2001-05-21T12:23:19+00:00

Gerd Moellmann

2001-05-21T12:23:19+00:00

46938996a03bc65597a8d097f46588d279f0b87b

(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.





(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.







(Fdefvaralias): New function.
2001-05-21T12:22:53+00:00

Gerd Moellmann

2001-05-21T12:22:53+00:00

612186c0100fc37530681d90413508a2cb7c4f3c

(specbind): Simplify the test if symbol is a constant.
(syms_of_eval): Defsubr Fdefvaralias.





(specbind): Simplify the test if symbol is a constant.
(syms_of_eval): Defsubr Fdefvaralias.







(Fintern, Funintern): Set symbol's interned and constant
2001-05-21T12:22:35+00:00

Gerd Moellmann

2001-05-21T12:22:35+00:00

09a67f052797a3e5ecc25c2dde8cafff845b827a

bit-fields.
(init_obarray): Likewise for t and nil.





bit-fields.
(init_obarray): Likewise for t and nil.







(print_preprocess, print_object): Test internedness of
2001-05-21T12:22:16+00:00

Gerd Moellmann

2001-05-21T12:22:16+00:00

0683316611a8b43ccfdc2532386c5553aabf2326

symbols differently.





symbols differently.







(enum symbol_interned): New enumeration.
2001-05-21T12:21:58+00:00

Gerd Moellmann

2001-05-21T12:21:58+00:00

8cddc95acb600f17f7e3cfde25dc6765ae6ef111

(struct Lisp_Symbol): Remove member `obarray', add
`indirect_variable', `constant', and `interned'.
(SYMBOL_INTERNED_P, SYMBOL_INTERNED_IN_INITIAL_OBARRAY_P)
(SYMBOL_CONSTANT_P, SYMBOL_VALUE, SET_SYMBOL_VALUE): New macros.
(indirect_variable): Add prototype.





(struct Lisp_Symbol): Remove member `obarray', add
`indirect_variable', `constant', and `interned'.
(SYMBOL_INTERNED_P, SYMBOL_INTERNED_IN_INITIAL_OBARRAY_P)
(SYMBOL_CONSTANT_P, SYMBOL_VALUE, SET_SYMBOL_VALUE): New macros.
(indirect_variable): Add prototype.