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 */