Mercurial > hg > xemacs-beta

comparison src/symbols.c @ 183:e121b013d1f0 r20-3b18

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b18
author cvs
date Mon, 13 Aug 2007 09:54:23 +0200
parents 8eaf7971accc
children 3d6bfa290dbd
comparison
equal deleted inserted replaced
182:f07455f06202 183:e121b013d1f0
3041 3041
3042 CHECK_SYMBOL (variable); 3042 CHECK_SYMBOL (variable);
3043 if (!NILP (follow_past_lisp_magic) && !EQ (follow_past_lisp_magic, Qt)) 3043 if (!NILP (follow_past_lisp_magic) && !EQ (follow_past_lisp_magic, Qt))
3044 { 3044 {
3045 CHECK_SYMBOL (follow_past_lisp_magic); 3045 CHECK_SYMBOL (follow_past_lisp_magic);
3046 (void) handler_type_from_function_symbol (follow_past_lisp_magic, 0); 3046 handler_type_from_function_symbol (follow_past_lisp_magic, 0);
3047 } 3047 }
3048 3048
3049 valcontents = fetch_value_maybe_past_magic (variable, 3049 valcontents = fetch_value_maybe_past_magic (variable,
3050 follow_past_lisp_magic); 3050 follow_past_lisp_magic);
3051 3051
3070 if (!SYMBOLP (object)) 3070 if (!SYMBOLP (object))
3071 return object; 3071 return object;
3072 if (!NILP (follow_past_lisp_magic) && !EQ (follow_past_lisp_magic, Qt)) 3072 if (!NILP (follow_past_lisp_magic) && !EQ (follow_past_lisp_magic, Qt))
3073 { 3073 {
3074 CHECK_SYMBOL (follow_past_lisp_magic); 3074 CHECK_SYMBOL (follow_past_lisp_magic);
3075 (void) handler_type_from_function_symbol (follow_past_lisp_magic, 0); 3075 handler_type_from_function_symbol (follow_past_lisp_magic, 0);
3076 } 3076 }
3077 return follow_varalias_pointers (object, follow_past_lisp_magic); 3077 return follow_varalias_pointers (object, follow_past_lisp_magic);
3078 } 3078 }
3079 3079
3080 3080