Mercurial > hg > xemacs-beta
comparison src/emacs.c @ 4953:304aebb79cd3
function renamings to track names of char typedefs
-------------------- ChangeLog entries follow: --------------------
man/ChangeLog addition:
2010-01-27 Ben Wing <ben@xemacs.org>
* internals/internals.texi (lrecords):
* internals/internals.texi (The DFC API):
* internals/internals.texi (Conversion to and from External Data):
* internals/internals.texi (Mule-izing Code):
* internals/internals.texi (Pervasive changes throughout XEmacs sources):
* internals/internals.texi (Ben's README):
* internals/internals.texi (Future Work -- Localized Text/Messages):
* emodules.texi (Defining Variables):
Rename:
write_c_string -> write_cistring
build_intstring -> build_istring
build_string -> build_cistring
build_ext_string -> build_extstring
make_ext_string -> make_extstring
buffer_insert_c_string -> buffer_insert_ascstring
intern_int -> intern_istring
See comment in src/ChangeLog about this.
modules/ChangeLog addition:
2010-01-27 Ben Wing <ben@xemacs.org>
* postgresql/postgresql.c (print_pgconn):
* postgresql/postgresql.c (print_pgresult):
* postgresql/postgresql.c (Fpq_conn_defaults):
* postgresql/postgresql.c (Fpq_pgconn):
* postgresql/postgresql.c (Fpq_res_status):
* postgresql/postgresql.c (Fpq_result_error_message):
* postgresql/postgresql.c (Fpq_fname):
* postgresql/postgresql.c (Fpq_get_value):
* postgresql/postgresql.c (Fpq_cmd_status):
* postgresql/postgresql.c (Fpq_cmd_tuples):
* postgresql/postgresql.c (Fpq_notifies):
* postgresql/postgresql.c (Fpq_get_line):
* postgresql/postgresql.c (Fpq_get_line_async):
* postgresql/postgresql.c (FROB):
* postgresql/postgresql.c (init_postgresql_from_environment):
* ldap/eldap.c:
* ldap/eldap.c (Fldap_open):
* ldap/eldap.c (Fldap_search_basic):
* canna/canna_api.c:
* canna/canna_api.c (make_euc_string):
Rename:
write_c_string -> write_cistring
build_intstring -> build_istring
build_string -> build_cistring
build_ext_string -> build_extstring
make_ext_string -> make_extstring
buffer_insert_c_string -> buffer_insert_ascstring
intern_int -> intern_istring
See comment in src/ChangeLog about this.
src/ChangeLog addition:
2010-01-27 Ben Wing <ben@xemacs.org>
* .gdbinit.in.in:
* README:
* abbrev.c (write_abbrev):
* abbrev.c (describe_abbrev):
* alloc.c (make_extstring):
* alloc.c (build_istring):
* alloc.c (build_cistring):
* alloc.c (build_ascstring):
* alloc.c (build_extstring):
* alloc.c (build_msg_istring):
* alloc.c (build_defer_istring):
* buffer.c (Fgenerate_new_buffer_name):
* buffer.c (init_buffer_2):
* console-tty.c (tty_init_console):
* console-x.c (get_display_arg_connection):
* console-x.c (x_perhaps_init_unseen_key_defaults):
* database.c (dbm_map):
* database.c (dbm_get):
* database.c (berkdb_get):
* database.c (berkdb_map):
* device-gtk.c (FROB_PIXMAP):
* device-gtk.c (Fgtk_style_info):
* device-msw.c (msprinter_default_printer):
* device-msw.c (sync_printer_with_devmode):
* device-x.c (coding_system_of_xrm_database):
* device-x.c (x_init_device):
* device-x.c (signal_if_x_error):
* device-x.c (Fx_get_resource):
* device-x.c (Fx_server_vendor):
* device-x.c (Fx_get_font_path):
* dialog-x.c (maybe_run_dbox_text_callback):
* doc.c (extract_object_file_name):
* doc.c (unparesseuxify_doc_string):
* doc.c (get_doc_string):
* doc.c (get_object_file_name):
* doc.c (Fdocumentation):
* doc.c (Fsnarf_documentation):
* doc.c (Fsubstitute_command_keys):
* editfns.c (init_editfns):
* editfns.c (Ftemp_directory):
* editfns.c (Fuser_login_name):
* editfns.c (Fuser_real_login_name):
* editfns.c (Fuser_home_directory):
* editfns.c (Fformat_time_string):
* editfns.c (Fcurrent_time_string):
* editfns.c (Fcurrent_time_zone):
* emacs.c:
* emacs.c (main_1):
* emodules.c (Flist_modules):
* emodules.c (emodules_load):
* emodules.c (emodules_doc_sym):
* emodules.c (vars_of_module):
* event-Xt.c (x_has_keysym):
* event-gtk.c (emacs_gtk_format_magic_event):
* event-gtk.c (dragndrop_data_received):
* event-gtk.c (gtk_reset_key_mapping):
* event-msw.c (mswindows_dde_callback):
* event-msw.c (mswindows_wnd_proc):
* faces.c (complex_vars_of_faces):
* file-coding.c (find_coding_system):
* file-coding.c (setup_eol_coding_systems):
* file-coding.c (make_coding_system_1):
* file-coding.c (snarf_coding_system):
* fileio.c:
* fileio.c (lisp_strerror):
* fileio.c (Ffile_name_directory):
* fileio.c (Ffile_name_as_directory):
* fileio.c (Fdirectory_file_name):
* fileio.c (if):
* fileio.c (Ffile_symlink_p):
* fileio.c (Fencrypt_string):
* fileio.c (Fdecrypt_string):
* filelock.c (lock_file):
* filelock.c (Ffile_locked_p):
* floatfns.c (matherr):
* font-mgr.c (build_fcapi_string):
* font-mgr.c (make_xlfd_font_regexp):
* frame-msw.c (mswindows_window_id):
* frame-msw.c (mswindows_frame_property):
* frame-x.c:
* frame-x.c (color_to_string):
* frame-x.c (maybe_set_frame_title_format):
* frame-x.c (x_cde_transfer_callback):
* frame-x.c (Fx_window_id):
* glade.c (connector):
* glade.c (Fglade_xml_textdomain):
* glade.c (syms_of_glade):
* glyphs-eimage.c (jpeg_instantiate):
* glyphs-eimage.c (png_instantiate):
* glyphs-eimage.c (tiff_instantiate):
* glyphs-gtk.c (font_instantiate):
* glyphs-gtk.c (BUILD_GLYPH_INST):
* glyphs-x.c (x_locate_pixmap_file):
* glyphs-x.c (font_instantiate):
* glyphs-x.c (x_widget_property):
* glyphs-x.c (BUILD_GLYPH_INST):
* glyphs.c (print_image_instance):
* glyphs.c (bitmap_to_lisp_data):
* glyphs.c (pixmap_to_lisp_data):
* gpmevent.c (turn_off_gpm):
* gpmevent.c (Fgpm_enabled_p):
* gpmevent.c (Fgpm_enable):
* gtk-glue.c (__make_string_mapper):
* gtk-glue.c (xemacs_gtklist_to_list):
* gtk-xemacs.c (FROB_FACE):
* gtk-xemacs.c (xemacs_gtk_convert_color):
* hpplay.c (player_error_internal):
* hpplay.c (myHandler):
* insdel.c (buffer_insert_ascstring_1):
* insdel.h:
* insdel.h (buffer_insert_ascstring):
* intl.c (Fcurrent_locale):
* intl.c (Fset_current_locale):
* keymap.c (make_key_description):
* keymap.c (Ftext_char_description):
* keymap.c (describe_command):
* keymap.c (describe_map):
* lisp.h:
* lread.c:
* lread.c (locate_file_in_directory_mapper):
* lread.c (locate_file_construct_suffixed_files_mapper):
* mule-charset.c (Fmake_charset):
* nt.c (Fmswindows_short_file_name):
* nt.c (Fmswindows_long_file_name):
* objects-gtk.c (__get_gtk_font_truename):
* objects-gtk.c (__gtk_font_list_internal):
* objects-msw.c (font_enum_callback_2):
* objects-msw.c (create_hfont_from_font_spec):
* objects-msw.c (mswindows_font_list):
* objects-msw.c (mswindows_font_spec_matches_charset_stage_2):
* objects-tty.c (tty_initialize_font_instance):
* objects-x.c (x_font_truename):
* objects-x.c (x_font_instance_truename):
* objects-x.c (x_font_instance_properties):
* objects-x.c (x_font_list):
* print.c (write_cistring):
* print.c (print_vector_internal):
* print.c (print_cons):
* process-nt.c (nt_canonicalize_host_name):
* process-unix.c (unix_create_process):
* process-unix.c (unix_canonicalize_host_name):
* process.c (status_message):
* process.c (status_notify):
* process.c (init_xemacs_process):
* process.c (syms_of_process):
* redisplay-tty.c (term_get_fkeys_1):
* redisplay-tty.c (CONDITIONAL_REASSIGN):
* search.c (compile_pattern_1):
* select-common.h (selection_data_to_lisp_data):
* select-gtk.c (atom_to_symbol):
* select-gtk.c (PROCESSING_GTK_CODE):
* select-msw.c (mswindows_get_foreign_selection):
* select-x.c (x_atom_to_symbol):
* select-x.c (Fx_get_cutbuffer_internal):
* symbols.c (intern_istring):
* symbols.c (intern):
* symbols.c (intern_converting_underscores_to_dashes):
* symbols.c (Fintern):
* sysdep.c (init_system_name):
* sysdll.c (dll_error):
* sysdll.c (dll_open):
* syswindows.h:
* syswindows.h (build_tstr_string):
* tests.c (DFC_CHECK_LENGTH):
* tests.c (DFC_CHECK_CONTENT):
* tests.c (DFC_RESULT_PASS):
* tests.c (Ftest_data_format_conversion):
* text.c:
* text.c (new_dfc_convert_now_damn_it):
* text.h:
* text.h (build_wext_string):
* tooltalk.c (tt_build_c_string):
* tooltalk.c (Ftooltalk_default_procid):
* tooltalk.c (Ftooltalk_default_session):
* tooltalk.c (init_tooltalk):
* ui-byhand.c (Fgtk_clist_get_text):
* ui-byhand.c (Fgtk_clist_get_pixtext):
* ui-byhand.c (Fgtk_label_get):
* ui-byhand.c (Fgtk_notebook_query_tab_label_packing):
* ui-gtk.c (emacs_gtk_object_printer):
* ui-gtk.c (emacs_gtk_boxed_printer):
* ui-gtk.c (gtk_type_to_lisp):
* ui-gtk.c (symbol_to_enum):
* ui-gtk.c (enum_to_symbol):
* unexaix.c (report_error):
* unexaix.c (ERROR0):
* unexec.c (report_error):
* unexec.c (ERROR0):
* unicode.c (unicode_to_ichar):
* win32.c (tstr_to_local_file_format):
* win32.c (Fmswindows_cygwin_to_win32_path):
* win32.c (struct read_link_hash):
* xemacs.def.in.in:
Rename:
write_c_string -> write_cistring
build_intstring -> build_istring
build_string -> build_cistring
build_ext_string -> build_extstring
make_ext_string -> make_extstring
buffer_insert_c_string -> buffer_insert_ascstring
intern_int -> intern_istring
These functions have been renamed so that the naming harmonizes
with the typedefs for strings: `cistring' along with CIbyte *,
`istring' along with Ibyte *, `extstring' along with Extbyte *,
`ascstring' along with Ascbyte *.
Also make buffer_insert_ascstring take Ascbyte * and assert
that its argument is ASCII.
author | Ben Wing <ben@xemacs.org> |
---|---|
date | Wed, 27 Jan 2010 00:35:36 -0600 |
parents | 19a72041c5ed |
children | cbe181529c34 |
comparison
equal
deleted
inserted
replaced
4952:19a72041c5ed | 4953:304aebb79cd3 |
---|---|
2008 the symbol isn't referenced anywhere else in the initialization | 2008 the symbol isn't referenced anywhere else in the initialization |
2009 code | 2009 code |
2010 -- Fset() on a symbol that is unbound | 2010 -- Fset() on a symbol that is unbound |
2011 -- Any of the object-creating functions in alloc.c: e.g. | 2011 -- Any of the object-creating functions in alloc.c: e.g. |
2012 - make_string() | 2012 - make_string() |
2013 - build_intstring() | 2013 - build_istring() |
2014 - build_string() | 2014 - build_cistring() |
2015 - build_ascstring() | 2015 - build_ascstring() |
2016 - make_vector() | 2016 - make_vector() |
2017 - make_int() | 2017 - make_int() |
2018 - make_char() | 2018 - make_char() |
2019 - make_extent() | 2019 - make_extent() |
2631 { | 2631 { |
2632 Vinvocation_name = Fcar (Vcommand_line_args); | 2632 Vinvocation_name = Fcar (Vcommand_line_args); |
2633 if (XSTRING_DATA (Vinvocation_name)[0] == '-') | 2633 if (XSTRING_DATA (Vinvocation_name)[0] == '-') |
2634 { | 2634 { |
2635 /* XEmacs as a login shell, oh goody! */ | 2635 /* XEmacs as a login shell, oh goody! */ |
2636 Vinvocation_name = build_intstring (egetenv ("SHELL")); | 2636 Vinvocation_name = build_istring (egetenv ("SHELL")); |
2637 } | 2637 } |
2638 Vinvocation_directory = Vinvocation_name; | 2638 Vinvocation_directory = Vinvocation_name; |
2639 | 2639 |
2640 if (!NILP (Ffile_name_directory (Vinvocation_name))) | 2640 if (!NILP (Ffile_name_directory (Vinvocation_name))) |
2641 { | 2641 { |
4475 DEFVAR_LISP ("emacs-program-name", &Vemacs_program_name /* | 4475 DEFVAR_LISP ("emacs-program-name", &Vemacs_program_name /* |
4476 *Name of the Emacs variant. | 4476 *Name of the Emacs variant. |
4477 For example, this may be \"xemacs\" or \"infodock\". | 4477 For example, this may be \"xemacs\" or \"infodock\". |
4478 This is mainly meant for use in path searching. | 4478 This is mainly meant for use in path searching. |
4479 */ ); | 4479 */ ); |
4480 Vemacs_program_name = build_ext_string (PATH_PROGNAME, Qfile_name); | 4480 Vemacs_program_name = build_extstring (PATH_PROGNAME, Qfile_name); |
4481 | 4481 |
4482 DEFVAR_LISP ("emacs-program-version", &Vemacs_program_version /* | 4482 DEFVAR_LISP ("emacs-program-version", &Vemacs_program_version /* |
4483 *Version of the Emacs variant. | 4483 *Version of the Emacs variant. |
4484 This typically has the form NN.NN-bNN. | 4484 This typically has the form NN.NN-bNN. |
4485 This is mainly meant for use in path searching. | 4485 This is mainly meant for use in path searching. |
4486 */ ); | 4486 */ ); |
4487 Vemacs_program_version = build_ext_string (PATH_VERSION, Qfile_name); | 4487 Vemacs_program_version = build_extstring (PATH_VERSION, Qfile_name); |
4488 | 4488 |
4489 DEFVAR_LISP ("exec-path", &Vexec_path /* | 4489 DEFVAR_LISP ("exec-path", &Vexec_path /* |
4490 *List of directories to search programs to run in subprocesses. | 4490 *List of directories to search programs to run in subprocesses. |
4491 Each element is a string (directory name) or nil (try default directory). | 4491 Each element is a string (directory name) or nil (try default directory). |
4492 */ ); | 4492 */ ); |
4502 For internal use by the build procedure only. | 4502 For internal use by the build procedure only. |
4503 configure's idea of what `exec-directory' will be. | 4503 configure's idea of what `exec-directory' will be. |
4504 */ ); | 4504 */ ); |
4505 #ifdef PATH_EXEC | 4505 #ifdef PATH_EXEC |
4506 Vconfigure_exec_directory = Ffile_name_as_directory | 4506 Vconfigure_exec_directory = Ffile_name_as_directory |
4507 (build_ext_string (PATH_EXEC, Qfile_name)); | 4507 (build_extstring (PATH_EXEC, Qfile_name)); |
4508 #else | 4508 #else |
4509 Vconfigure_exec_directory = Qnil; | 4509 Vconfigure_exec_directory = Qnil; |
4510 #endif | 4510 #endif |
4511 | 4511 |
4512 DEFVAR_LISP ("lisp-directory", &Vlisp_directory /* | 4512 DEFVAR_LISP ("lisp-directory", &Vlisp_directory /* |
4518 For internal use by the build procedure only. | 4518 For internal use by the build procedure only. |
4519 configure's idea of what `lisp-directory' will be. | 4519 configure's idea of what `lisp-directory' will be. |
4520 */ ); | 4520 */ ); |
4521 #ifdef PATH_LOADSEARCH | 4521 #ifdef PATH_LOADSEARCH |
4522 Vconfigure_lisp_directory = Ffile_name_as_directory | 4522 Vconfigure_lisp_directory = Ffile_name_as_directory |
4523 (build_ext_string (PATH_LOADSEARCH, Qfile_name)); | 4523 (build_extstring (PATH_LOADSEARCH, Qfile_name)); |
4524 #else | 4524 #else |
4525 Vconfigure_lisp_directory = Qnil; | 4525 Vconfigure_lisp_directory = Qnil; |
4526 #endif | 4526 #endif |
4527 | 4527 |
4528 DEFVAR_LISP ("mule-lisp-directory", &Vmule_lisp_directory /* | 4528 DEFVAR_LISP ("mule-lisp-directory", &Vmule_lisp_directory /* |
4534 For internal use by the build procedure only. | 4534 For internal use by the build procedure only. |
4535 configure's idea of what `mule-lisp-directory' will be. | 4535 configure's idea of what `mule-lisp-directory' will be. |
4536 */ ); | 4536 */ ); |
4537 #ifdef PATH_MULELOADSEARCH | 4537 #ifdef PATH_MULELOADSEARCH |
4538 Vconfigure_mule_lisp_directory = Ffile_name_as_directory | 4538 Vconfigure_mule_lisp_directory = Ffile_name_as_directory |
4539 (build_ext_string (PATH_MULELOADSEARCH, Qfile_name); | 4539 (build_extstring (PATH_MULELOADSEARCH, Qfile_name); |
4540 #else | 4540 #else |
4541 Vconfigure_mule_lisp_directory = Qnil; | 4541 Vconfigure_mule_lisp_directory = Qnil; |
4542 #endif | 4542 #endif |
4543 | 4543 |
4544 DEFVAR_LISP ("module-directory", &Vmodule_directory /* | 4544 DEFVAR_LISP ("module-directory", &Vmodule_directory /* |
4550 For internal use by the build procedure only. | 4550 For internal use by the build procedure only. |
4551 configure's idea of what `module-directory' will be. | 4551 configure's idea of what `module-directory' will be. |
4552 */ ); | 4552 */ ); |
4553 #ifdef PATH_MODULESEARCH | 4553 #ifdef PATH_MODULESEARCH |
4554 Vconfigure_module_directory = Ffile_name_as_directory | 4554 Vconfigure_module_directory = Ffile_name_as_directory |
4555 (build_ext_string (PATH_MODULESEARCH, Qfile_name)); | 4555 (build_extstring (PATH_MODULESEARCH, Qfile_name)); |
4556 #else | 4556 #else |
4557 Vconfigure_module_directory = Qnil; | 4557 Vconfigure_module_directory = Qnil; |
4558 #endif | 4558 #endif |
4559 | 4559 |
4560 DEFVAR_LISP ("configure-early-package-directories", &Vconfigure_early_package_directories /* | 4560 DEFVAR_LISP ("configure-early-package-directories", &Vconfigure_early_package_directories /* |
4610 For internal use by the build procedure only. | 4610 For internal use by the build procedure only. |
4611 configure's idea of what `data-directory' will be. | 4611 configure's idea of what `data-directory' will be. |
4612 */ ); | 4612 */ ); |
4613 #ifdef PATH_DATA | 4613 #ifdef PATH_DATA |
4614 Vconfigure_data_directory = Ffile_name_as_directory | 4614 Vconfigure_data_directory = Ffile_name_as_directory |
4615 (build_ext_string (PATH_DATA, Qfile_name)); | 4615 (build_extstring (PATH_DATA, Qfile_name)); |
4616 #else | 4616 #else |
4617 Vconfigure_data_directory = Qnil; | 4617 Vconfigure_data_directory = Qnil; |
4618 #endif | 4618 #endif |
4619 | 4619 |
4620 DEFVAR_LISP ("data-directory-list", &Vdata_directory_list /* | 4620 DEFVAR_LISP ("data-directory-list", &Vdata_directory_list /* |
4632 For internal use by the build procedure only. | 4632 For internal use by the build procedure only. |
4633 configure's idea of what `site-directory' will be. | 4633 configure's idea of what `site-directory' will be. |
4634 */ ); | 4634 */ ); |
4635 #ifdef PATH_SITE | 4635 #ifdef PATH_SITE |
4636 Vconfigure_site_directory = Ffile_name_as_directory | 4636 Vconfigure_site_directory = Ffile_name_as_directory |
4637 (build_ext_string (PATH_SITE, Qfile_name)); | 4637 (build_extstring (PATH_SITE, Qfile_name)); |
4638 #else | 4638 #else |
4639 Vconfigure_site_directory = Qnil; | 4639 Vconfigure_site_directory = Qnil; |
4640 #endif | 4640 #endif |
4641 | 4641 |
4642 DEFVAR_LISP ("site-module-directory", &Vsite_module_directory /* | 4642 DEFVAR_LISP ("site-module-directory", &Vsite_module_directory /* |
4648 For internal use by the build procedure only. | 4648 For internal use by the build procedure only. |
4649 configure's idea of what `site-directory' will be. | 4649 configure's idea of what `site-directory' will be. |
4650 */ ); | 4650 */ ); |
4651 #ifdef PATH_SITE_MODULES | 4651 #ifdef PATH_SITE_MODULES |
4652 Vconfigure_site_module_directory = Ffile_name_as_directory | 4652 Vconfigure_site_module_directory = Ffile_name_as_directory |
4653 (build_ext_string (PATH_SITE_MODULES, Qfile_name)); | 4653 (build_extstring (PATH_SITE_MODULES, Qfile_name)); |
4654 #else | 4654 #else |
4655 Vconfigure_site_module_directory = Qnil; | 4655 Vconfigure_site_module_directory = Qnil; |
4656 #endif | 4656 #endif |
4657 | 4657 |
4658 DEFVAR_LISP ("doc-directory", &Vdoc_directory /* | 4658 DEFVAR_LISP ("doc-directory", &Vdoc_directory /* |
4665 For internal use by the build procedure only. | 4665 For internal use by the build procedure only. |
4666 configure's idea of what `doc-directory' will be. | 4666 configure's idea of what `doc-directory' will be. |
4667 */ ); | 4667 */ ); |
4668 #ifdef PATH_DOC | 4668 #ifdef PATH_DOC |
4669 Vconfigure_doc_directory = Ffile_name_as_directory | 4669 Vconfigure_doc_directory = Ffile_name_as_directory |
4670 (build_ext_string (PATH_DOC, Qfile_name)); | 4670 (build_extstring (PATH_DOC, Qfile_name)); |
4671 #else | 4671 #else |
4672 Vconfigure_doc_directory = Qnil; | 4672 Vconfigure_doc_directory = Qnil; |
4673 #endif | 4673 #endif |
4674 | 4674 |
4675 DEFVAR_LISP ("configure-exec-prefix-directory", &Vconfigure_exec_prefix_directory /* | 4675 DEFVAR_LISP ("configure-exec-prefix-directory", &Vconfigure_exec_prefix_directory /* |
4676 For internal use by the build procedure only. | 4676 For internal use by the build procedure only. |
4677 configure's idea of what `exec-prefix-directory' will be. | 4677 configure's idea of what `exec-prefix-directory' will be. |
4678 */ ); | 4678 */ ); |
4679 #ifdef PATH_EXEC_PREFIX | 4679 #ifdef PATH_EXEC_PREFIX |
4680 Vconfigure_exec_prefix_directory = Ffile_name_as_directory | 4680 Vconfigure_exec_prefix_directory = Ffile_name_as_directory |
4681 (build_ext_string (PATH_EXEC_PREFIX, Qfile_name)); | 4681 (build_extstring (PATH_EXEC_PREFIX, Qfile_name)); |
4682 #else | 4682 #else |
4683 Vconfigure_exec_prefix_directory = Qnil; | 4683 Vconfigure_exec_prefix_directory = Qnil; |
4684 #endif | 4684 #endif |
4685 | 4685 |
4686 DEFVAR_LISP ("configure-prefix-directory", &Vconfigure_prefix_directory /* | 4686 DEFVAR_LISP ("configure-prefix-directory", &Vconfigure_prefix_directory /* |
4687 For internal use by the build procedure only. | 4687 For internal use by the build procedure only. |
4688 configure's idea of what `prefix-directory' will be. | 4688 configure's idea of what `prefix-directory' will be. |
4689 */ ); | 4689 */ ); |
4690 #ifdef PATH_PREFIX | 4690 #ifdef PATH_PREFIX |
4691 Vconfigure_prefix_directory = Ffile_name_as_directory | 4691 Vconfigure_prefix_directory = Ffile_name_as_directory |
4692 (build_ext_string (PATH_PREFIX, Qfile_name)); | 4692 (build_extstring (PATH_PREFIX, Qfile_name)); |
4693 #else | 4693 #else |
4694 Vconfigure_prefix_directory = Qnil; | 4694 Vconfigure_prefix_directory = Qnil; |
4695 #endif | 4695 #endif |
4696 | 4696 |
4697 DEFVAR_LISP ("configure-info-directory", &Vconfigure_info_directory /* | 4697 DEFVAR_LISP ("configure-info-directory", &Vconfigure_info_directory /* |
4700 Emacs's info files; the default value for Info-default-directory-list | 4700 Emacs's info files; the default value for Info-default-directory-list |
4701 includes this. | 4701 includes this. |
4702 */ ); | 4702 */ ); |
4703 #ifdef PATH_INFO | 4703 #ifdef PATH_INFO |
4704 Vconfigure_info_directory = | 4704 Vconfigure_info_directory = |
4705 Ffile_name_as_directory (build_ext_string (PATH_INFO, Qfile_name)); | 4705 Ffile_name_as_directory (build_extstring (PATH_INFO, Qfile_name)); |
4706 #else | 4706 #else |
4707 Vconfigure_info_directory = Qnil; | 4707 Vconfigure_info_directory = Qnil; |
4708 #endif | 4708 #endif |
4709 | 4709 |
4710 DEFVAR_LISP ("configure-info-path", &Vconfigure_info_path /* | 4710 DEFVAR_LISP ("configure-info-path", &Vconfigure_info_path /* |