Mercurial > hg > xemacs-beta

comparison src/alloc.c @ 4923:8ee3c10d1ed5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
remove old no-longer-useful kludgy compiled-fun annotations hack -------------------- ChangeLog entries follow: -------------------- src/ChangeLog addition: 2010-02-03 Ben Wing <ben@xemacs.org> * alloc.c (Fmake_byte_code): * lread.c: * lread.c (readevalloop): * lread.c (Fread): * lread.c (Fread_from_string): * lread.c (read_list_conser): * lread.c (read_list): * lread.c (vars_of_lread): Remove the old kludgy stuff bracketed by `#ifdef COMPILED_FUNCTION_ANNOTATION_HACK_OLD_WAY'.
author Ben Wing <ben@xemacs.org>
date Wed, 03 Feb 2010 08:50:00 -0600
parents 17362f371cc2
children cbe181529c34
comparison
equal deleted inserted replaced
4922:8934492a0e97 4923:8ee3c10d1ed5
1928 1928
1929 CHECK_NATNUM (stack_depth); 1929 CHECK_NATNUM (stack_depth);
1930 f->stack_depth = (unsigned short) XINT (stack_depth); 1930 f->stack_depth = (unsigned short) XINT (stack_depth);
1931 1931
1932 #ifdef COMPILED_FUNCTION_ANNOTATION_HACK 1932 #ifdef COMPILED_FUNCTION_ANNOTATION_HACK
1933 #ifdef COMPILED_FUNCTION_ANNOTATION_HACK_OLD_WAY 1933 f->annotated = Vload_file_name_internal;
1934 if (!NILP (Vcurrent_compiled_function_annotation))
1935 f->annotated = Vcurrent_compiled_function_annotation;
1936 else
1937 #endif /* COMPILED_FUNCTION_ANNOTATION_HACK_OLD_WAY */
1938 f->annotated = Vload_file_name_internal;
1939 #endif /* COMPILED_FUNCTION_ANNOTATION_HACK */ 1934 #endif /* COMPILED_FUNCTION_ANNOTATION_HACK */
1940 1935
1941 /* doc_string may be nil, string, int, or a cons (string . int). 1936 /* doc_string may be nil, string, int, or a cons (string . int).
1942 interactive may be list or string (or unbound). */ 1937 interactive may be list or string (or unbound). */
1943 f->doc_and_interactive = Qunbound; 1938 f->doc_and_interactive = Qunbound;