Mercurial > emacs
comparison src/lisp.h @ 1518:eda3ace74d74
* lisp.h (Fdefault_boundp, make_float, Ffloat, Fnth, Fcopy_alist,
Fmake_byte_code, Fverify_visited_file_modtime, Ffile_exists_p,
Fdirectory_file_name, Ffile_name_directory,
expand_and_dir_to_file, Ffile_accessible_directory_p, Fbyte_code,
Fundo_boundary, truncate_undo_list): Add extern declarations for
these.
* lisp.h (DEFVARLISP, DEFVARBOOL, DEFVARINT, DEFVARPERBUFFER):
Removed these definitions; we should be using the versions whose
names use underscores.
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Sat, 31 Oct 1992 05:25:29 +0000 |
parents | 89ac471c745c |
children | c0c9fc68a006 |
comparison
equal
deleted
inserted
replaced
1517:72b7bbcaf7d8 | 1518:eda3ace74d74 |
---|---|
727 extern void defvar_int (); | 727 extern void defvar_int (); |
728 | 728 |
729 /* Macros we use to define forwarded Lisp variables. | 729 /* Macros we use to define forwarded Lisp variables. |
730 These are used in the syms_of_FILENAME functions. */ | 730 These are used in the syms_of_FILENAME functions. */ |
731 | 731 |
732 #define DEFVARLISP(lname, vname, doc) defvar_lisp (lname, vname) | |
733 #define DEFVARBOOL(lname, vname, doc) defvar_bool (lname, vname) | |
734 #define DEFVARINT(lname, vname, doc) defvar_int (lname, vname) | |
735 #define DEFVARPERBUFFER(lname, vname, doc) \ | |
736 defvar_per_buffer (lname, vname) | |
737 | |
738 #define DEFVAR_LISP(lname, vname, doc) defvar_lisp (lname, vname) | 732 #define DEFVAR_LISP(lname, vname, doc) defvar_lisp (lname, vname) |
739 #define DEFVAR_LISP_NOPRO(lname, vname, doc) defvar_lisp_nopro (lname, vname) | 733 #define DEFVAR_LISP_NOPRO(lname, vname, doc) defvar_lisp_nopro (lname, vname) |
740 #define DEFVAR_BOOL(lname, vname, doc) defvar_bool (lname, vname) | 734 #define DEFVAR_BOOL(lname, vname, doc) defvar_bool (lname, vname) |
741 #define DEFVAR_INT(lname, vname, doc) defvar_int (lname, vname) | 735 #define DEFVAR_INT(lname, vname, doc) defvar_int (lname, vname) |
742 #define DEFVAR_PER_BUFFER(lname, vname, type, doc) \ | 736 #define DEFVAR_PER_BUFFER(lname, vname, type, doc) \ |
946 extern Lisp_Object Fboundp (), Ffboundp (), Fmakunbound (), Ffmakunbound (); | 940 extern Lisp_Object Fboundp (), Ffboundp (), Fmakunbound (), Ffmakunbound (); |
947 extern Lisp_Object Fsymbol_function (), Fsymbol_plist (), Fsymbol_name (); | 941 extern Lisp_Object Fsymbol_function (), Fsymbol_plist (), Fsymbol_name (); |
948 extern Lisp_Object indirect_function (), Findirect_function (); | 942 extern Lisp_Object indirect_function (), Findirect_function (); |
949 extern Lisp_Object Ffset (), Fsetplist (); | 943 extern Lisp_Object Ffset (), Fsetplist (); |
950 extern Lisp_Object Fsymbol_value (), find_symbol_value (), Fset (); | 944 extern Lisp_Object Fsymbol_value (), find_symbol_value (), Fset (); |
951 extern Lisp_Object Fdefault_value (), Fset_default (); | 945 extern Lisp_Object Fdefault_value (), Fset_default (), Fdefault_boundp (); |
952 | 946 |
953 extern Lisp_Object Faref (), Faset (), Farray_length (); | 947 extern Lisp_Object Faref (), Faset (), Farray_length (); |
954 | 948 |
955 extern Lisp_Object Fstring_to_int (), Fint_to_string (); | 949 extern Lisp_Object Fstring_to_int (), Fint_to_string (); |
956 extern Lisp_Object Feqlsign (), Fgtr (), Flss (), Fgeq (), Fleq (), Fneq (), Fzerop (); | 950 extern Lisp_Object Feqlsign (), Fgtr (), Flss (), Fgeq (), Fleq (), Fneq (), Fzerop (); |
963 extern void args_out_of_range_3 (); | 957 extern void args_out_of_range_3 (); |
964 extern Lisp_Object wrong_type_argument (); | 958 extern Lisp_Object wrong_type_argument (); |
965 #ifdef LISP_FLOAT_TYPE | 959 #ifdef LISP_FLOAT_TYPE |
966 extern Lisp_Object Ffloat_to_int(), Fint_to_float(); | 960 extern Lisp_Object Ffloat_to_int(), Fint_to_float(); |
967 extern double extract_float(); | 961 extern double extract_float(); |
962 extern Lisp_Object make_float (); | |
963 extern Lisp_Object Ffloat (); | |
968 #endif /* LISP_FLOAT_TYPE */ | 964 #endif /* LISP_FLOAT_TYPE */ |
969 | 965 |
970 /* Defined in fns.c */ | 966 /* Defined in fns.c */ |
971 extern Lisp_Object Qstring_lessp; | 967 extern Lisp_Object Qstring_lessp; |
972 extern Lisp_Object Vfeatures; | 968 extern Lisp_Object Vfeatures; |
973 extern Lisp_Object Fidentity (), Frandom (); | 969 extern Lisp_Object Fidentity (), Frandom (); |
974 extern Lisp_Object Flength (); | 970 extern Lisp_Object Flength (); |
975 extern Lisp_Object Fappend (), Fconcat (), Fvconcat (), Fcopy_sequence (); | 971 extern Lisp_Object Fappend (), Fconcat (), Fvconcat (), Fcopy_sequence (); |
976 extern Lisp_Object Fsubstring (); | 972 extern Lisp_Object Fsubstring (); |
977 extern Lisp_Object Fnthcdr (), Fmemq (), Fassq (), Fassoc (); | 973 extern Lisp_Object Fnth (), Fnthcdr (), Fmemq (), Fassq (), Fassoc (); |
978 extern Lisp_Object Frassq (), Fdelq (), Fsort (); | 974 extern Lisp_Object Frassq (), Fdelq (), Fsort (); |
979 extern Lisp_Object Freverse (), Fnreverse (), Fget (), Fput (), Fequal (); | 975 extern Lisp_Object Freverse (), Fnreverse (), Fget (), Fput (), Fequal (); |
980 extern Lisp_Object Ffillarray (), Fnconc (), Fmapcar (), Fmapconcat (); | 976 extern Lisp_Object Ffillarray (), Fnconc (), Fmapcar (), Fmapconcat (); |
981 extern Lisp_Object Fy_or_n_p (), do_yes_or_no_p (); | 977 extern Lisp_Object Fy_or_n_p (), do_yes_or_no_p (); |
982 extern Lisp_Object Ffeaturep (), Frequire () , Fprovide (); | 978 extern Lisp_Object Ffeaturep (), Frequire () , Fprovide (); |
983 extern Lisp_Object concat2 (), nconc2 (); | 979 extern Lisp_Object concat2 (), nconc2 (); |
984 extern Lisp_Object assq_no_quit (); | 980 extern Lisp_Object assq_no_quit (); |
981 extern Lisp_Object Fcopy_alist (); | |
985 | 982 |
986 /* Defined in alloc.c */ | 983 /* Defined in alloc.c */ |
987 extern Lisp_Object Vpurify_flag; | 984 extern Lisp_Object Vpurify_flag; |
988 extern Lisp_Object Fcons (), Flist(), Fmake_list (); | 985 extern Lisp_Object Fcons (), Flist(), Fmake_list (); |
989 extern Lisp_Object Fmake_vector (), Fvector (), Fmake_symbol (), Fmake_marker (); | 986 extern Lisp_Object Fmake_vector (), Fvector (), Fmake_symbol (), Fmake_marker (); |
990 extern Lisp_Object Fmake_string (), build_string (), make_string (); | 987 extern Lisp_Object Fmake_string (), build_string (), make_string (); |
991 extern Lisp_Object make_array (), make_uninit_string (); | 988 extern Lisp_Object make_array (), make_uninit_string (); |
992 extern Lisp_Object Fpurecopy (), make_pure_string (); | 989 extern Lisp_Object Fpurecopy (), make_pure_string (); |
993 extern Lisp_Object pure_cons (), make_pure_vector (); | 990 extern Lisp_Object pure_cons (), make_pure_vector (); |
994 extern Lisp_Object Fgarbage_collect (); | 991 extern Lisp_Object Fgarbage_collect (); |
992 extern Lisp_Object Fmake_byte_code (); | |
995 | 993 |
996 /* Defined in print.c */ | 994 /* Defined in print.c */ |
997 extern Lisp_Object Vprin1_to_string_buffer; | 995 extern Lisp_Object Vprin1_to_string_buffer; |
998 extern Lisp_Object Fprin1 (), Fprin1_to_string (), Fprinc (); | 996 extern Lisp_Object Fprin1 (), Fprin1_to_string (), Fprinc (); |
999 extern Lisp_Object Fterpri (), Fprint (); | 997 extern Lisp_Object Fterpri (), Fprint (); |
1070 extern Lisp_Object Qfile_error; | 1068 extern Lisp_Object Qfile_error; |
1071 extern Lisp_Object Ffile_name_as_directory (); | 1069 extern Lisp_Object Ffile_name_as_directory (); |
1072 extern Lisp_Object Fexpand_file_name (), Ffile_name_nondirectory (); | 1070 extern Lisp_Object Fexpand_file_name (), Ffile_name_nondirectory (); |
1073 extern Lisp_Object Fsubstitute_in_file_name (); | 1071 extern Lisp_Object Fsubstitute_in_file_name (); |
1074 extern Lisp_Object Ffile_symlink_p (); | 1072 extern Lisp_Object Ffile_symlink_p (); |
1073 extern Lisp_Object Fverify_visited_file_modtime (); | |
1074 extern Lisp_Object Ffile_exists_p (); | |
1075 extern Lisp_Object Fdirectory_file_name (); | |
1076 extern Lisp_Object Ffile_name_directory (); | |
1077 extern Lisp_Object expand_and_dir_to_file (); | |
1078 extern Lisp_Object Ffile_accessible_directory_p (); | |
1075 | 1079 |
1076 /* Defined in abbrev.c */ | 1080 /* Defined in abbrev.c */ |
1077 | 1081 |
1078 extern Lisp_Object Vfundamental_mode_abbrev_table; | 1082 extern Lisp_Object Vfundamental_mode_abbrev_table; |
1079 | 1083 |
1181 extern Lisp_Object Fsubstitute_command_keys (); | 1185 extern Lisp_Object Fsubstitute_command_keys (); |
1182 extern Lisp_Object Fdocumentation (), Fdocumentation_property (); | 1186 extern Lisp_Object Fdocumentation (), Fdocumentation_property (); |
1183 | 1187 |
1184 /* defined in bytecode.c */ | 1188 /* defined in bytecode.c */ |
1185 extern Lisp_Object Qbytecode; | 1189 extern Lisp_Object Qbytecode; |
1190 extern Lisp_Object Fbyte_code (); | |
1186 | 1191 |
1187 /* defined in macros.c */ | 1192 /* defined in macros.c */ |
1188 extern Lisp_Object Qexecute_kbd_macro; | 1193 extern Lisp_Object Qexecute_kbd_macro; |
1189 extern Lisp_Object Fexecute_kbd_macro (); | 1194 extern Lisp_Object Fexecute_kbd_macro (); |
1190 | 1195 |
1196 /* defined in undo.c */ | |
1197 extern Lisp_Object Fundo_boundary (); | |
1198 extern Lisp_Object truncate_undo_list (); | |
1199 | |
1191 /* Nonzero means Emacs has already been initialized. | 1200 /* Nonzero means Emacs has already been initialized. |
1192 Used during startup to detect startup of dumped Emacs. */ | 1201 Used during startup to detect startup of dumped Emacs. */ |
1193 extern int initialized; | 1202 extern int initialized; |
1194 | 1203 |
1195 extern int immediate_quit; /* Nonzero means ^G can quit instantly */ | 1204 extern int immediate_quit; /* Nonzero means ^G can quit instantly */ |