# HG changeset patch # User Richard M. Stallman # Date 888888671 0 # Node ID 9b33c6a5b4dce9817eb94b723cc307a979987d81 # Parent 1290ba9ccec8241ae8e99cd0ca77c1007842f1c3 (Vnonascii_translate_table, Qcharset): New variable decls. (Fstring_make_multibyte, Fstring_make_unibyte): New function decl. (Fstring_as_multibyte, Fstring_as_unibyte): New function decl. (list2, list3, list4, list5): New function decl. (Fwrite_region): Add an argument. (compare_window_configurations): New function decl. diff -r 1290ba9ccec8 -r 9b33c6a5b4dc src/lisp.h --- a/src/lisp.h Tue Mar 03 01:29:16 1998 +0000 +++ b/src/lisp.h Tue Mar 03 01:31:11 1998 +0000 @@ -449,6 +449,11 @@ unsigned int total_length; /* Length of myself and both children. */ unsigned int position; /* Cache of interval's character position. */ + /* This field is usually updated + simultaneously with an interval + traversal, there is no guaranty + that it is valid for a random + interval. */ struct interval *left; /* Intervals which precede me. */ struct interval *right; /* Intervals which succeed me. */ @@ -1601,7 +1606,6 @@ EXFUN (Fforward_line, 1); extern int forward_point P_ ((int)); extern int internal_self_insert P_ ((int, int)); -extern int nonascii_insert_offset; /* Defined in coding.c */ EXFUN (Fcoding_system_p, 1); @@ -1614,10 +1618,13 @@ extern Lisp_Object detect_coding_system P_ ((unsigned char *, int, int)); /* Defined in charset.c */ +extern int nonascii_insert_offset; +extern Lisp_Object Vnonascii_translate_table; EXFUN (Fchar_bytes, 1); extern int chars_in_text P_ ((unsigned char *, int)); extern int multibyte_chars_in_text P_ ((unsigned char *, int)); extern int unibyte_char_to_multibyte P_ ((int)); +extern Lisp_Object Qcharset; /* Defined in syntax.c */ EXFUN (Fforward_word, 1); @@ -1638,6 +1645,10 @@ EXFUN (Fconcat, MANY); EXFUN (Fvconcat, MANY); EXFUN (Fcopy_sequence, 1); +EXFUN (Fstring_make_multibyte, 1); +EXFUN (Fstring_make_unibyte, 1); +EXFUN (Fstring_as_multibyte, 1); +EXFUN (Fstring_as_unibyte, 1); EXFUN (Fsubstring, 3); extern Lisp_Object substring_both P_ ((Lisp_Object, int, int, int, int)); EXFUN (Fnth, 2); @@ -1751,6 +1762,10 @@ extern void buffer_memory_full P_ ((void)); extern Lisp_Object Vpurify_flag; EXFUN (Fcons, 2); +EXFUN (list2, 2); +EXFUN (list3, 3); +EXFUN (list4, 4); +EXFUN (list5, 5); EXFUN (Flist, MANY); EXFUN (Fmake_list, 2); extern Lisp_Object allocate_misc P_ ((void)); @@ -2006,7 +2021,7 @@ EXFUN (Ffile_accessible_directory_p, 1); EXFUN (Funhandled_file_name_directory, 1); EXFUN (Ffile_directory_p, 1); -EXFUN (Fwrite_region, 6); +EXFUN (Fwrite_region, 7); EXFUN (Ffile_readable_p, 1); EXFUN (Ffile_executable_p, 1); EXFUN (Fread_file_name, 5); @@ -2139,6 +2154,7 @@ EXFUN (Fsplit_window, 3); EXFUN (Fset_window_configuration, 1); EXFUN (Fcurrent_window_configuration, 1); +extern int compare_window_configurations P_ ((Lisp_Object, Lisp_Object, int)); EXFUN (Fcoordinates_in_window_p, 2); EXFUN (Fwindow_at, 3); EXFUN (Fpos_visible_in_window_p, 2);