Mercurial > hg > xemacs-beta

comparison src/lisp.h @ 440:8de8e3f6228a r21-2-28

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-28
author cvs
date Mon, 13 Aug 2007 11:33:38 +0200
parents 84b14dcb0985
children abe6d1db359e
comparison
equal deleted inserted replaced
439:357dd071b03c 440:8de8e3f6228a
20 the Free Software Foundation, Inc., 59 Temple Place - Suite 330, 20 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
21 Boston, MA 02111-1307, USA. */ 21 Boston, MA 02111-1307, USA. */
22 22
23 /* Synched up with: FSF 19.30. */ 23 /* Synched up with: FSF 19.30. */
24 24
25 #ifndef _XEMACS_LISP_H_ 25 #ifndef INCLUDED_lisp_h_
26 #define _XEMACS_LISP_H_ 26 #define INCLUDED_lisp_h_
27 27
28 /************************************************************************/ 28 /************************************************************************/
29 /* general definitions */ 29 /* general definitions */
30 /************************************************************************/ 30 /************************************************************************/
31 31
60 void Dynarr_resize (void *dy, int size); 60 void Dynarr_resize (void *dy, int size);
61 void Dynarr_insert_many (void *d, CONST void *el, int len, int start); 61 void Dynarr_insert_many (void *d, CONST void *el, int len, int start);
62 void Dynarr_delete_many (void *d, int start, int len); 62 void Dynarr_delete_many (void *d, int start, int len);
63 void Dynarr_free (void *d); 63 void Dynarr_free (void *d);
64 64
65 #define Dynarr_new(type) ((type##_dynarr *) Dynarr_newf (sizeof(type))) 65 #define Dynarr_new(type) ((type##_dynarr *) Dynarr_newf (sizeof (type)))
66 #define Dynarr_at(d, pos) ((d)->base[pos]) 66 #define Dynarr_at(d, pos) ((d)->base[pos])
67 #define Dynarr_atp(d, pos) (&Dynarr_at (d, pos)) 67 #define Dynarr_atp(d, pos) (&Dynarr_at (d, pos))
68 #define Dynarr_length(d) ((d)->cur) 68 #define Dynarr_length(d) ((d)->cur)
69 #define Dynarr_largest(d) ((d)->largest) 69 #define Dynarr_largest(d) ((d)->largest)
70 #define Dynarr_reset(d) ((d)->cur = 0) 70 #define Dynarr_reset(d) ((d)->cur = 0)
71 #define Dynarr_add_many(d, el, len) Dynarr_insert_many (d, el, len, (d)->cur) 71 #define Dynarr_add_many(d, el, len) Dynarr_insert_many (d, el, len, (d)->cur)
72 #define Dynarr_insert_many_at_start(d, el, len) \ 72 #define Dynarr_insert_many_at_start(d, el, len) \
73 Dynarr_insert_many (d, el, len, 0) 73 Dynarr_insert_many (d, el, len, 0)
74 #define Dynarr_add_literal_string(d, s) Dynarr_add_many (d, s, sizeof(s) - 1) 74 #define Dynarr_add_literal_string(d, s) Dynarr_add_many (d, s, sizeof (s) - 1)
75 #define Dynarr_add_lisp_string(d, s) do { \ 75 #define Dynarr_add_lisp_string(d, s) do { \
76 struct Lisp_String *dyna_ls_s = XSTRING (s); \ 76 Lisp_String *dyna_ls_s = XSTRING (s); \
77 Dynarr_add_many (d, (char *) string_data (dyna_ls_s), \ 77 Dynarr_add_many (d, (char *) string_data (dyna_ls_s), \
78 string_length (dyna_ls_s)); \ 78 string_length (dyna_ls_s)); \
79 } while (0) 79 } while (0)
80 80
81 #define Dynarr_add(d, el) ( \ 81 #define Dynarr_add(d, el) ( \
85 85
86 /* The following defines will get you into real trouble if you aren't 86 /* The following defines will get you into real trouble if you aren't
87 careful. But they can save a lot of execution time when used wisely. */ 87 careful. But they can save a lot of execution time when used wisely. */
88 #define Dynarr_increment(d) ((d)->cur++) 88 #define Dynarr_increment(d) ((d)->cur++)
89 #define Dynarr_set_size(d, n) ((d)->cur = n) 89 #define Dynarr_set_size(d, n) ((d)->cur = n)
90
91 /* Minimum size in elements for dynamic array when resized; default is 32 */
92 extern int Dynarr_min_size;
93 90
94 #ifdef MEMORY_USAGE_STATS 91 #ifdef MEMORY_USAGE_STATS
95 struct overhead_stats; 92 struct overhead_stats;
96 size_t Dynarr_memory_usage (void *d, struct overhead_stats *stats); 93 size_t Dynarr_memory_usage (void *d, struct overhead_stats *stats);
97 #endif 94 #endif
338 struct extent_fragment; 335 struct extent_fragment;
339 struct extent; 336 struct extent;
340 typedef struct extent *EXTENT; 337 typedef struct extent *EXTENT;
341 struct frame; /* "frame.h" */ 338 struct frame; /* "frame.h" */
342 struct window; /* "window.h" */ 339 struct window; /* "window.h" */
343 struct Lisp_Event; /* "events.h" */ 340 typedef struct Lisp_Event Lisp_Event; /* "events.h" */
344 typedef struct Lisp_Event Lisp_Event; 341 typedef struct Lisp_Face Lisp_Face; /* "faces.h" */
345 struct Lisp_Face; 342 typedef struct Lisp_Process Lisp_Process; /* "procimpl.h" */
346 typedef struct Lisp_Face Lisp_Face;
347 struct Lisp_Process; /* "process.c" */
348 typedef struct Lisp_Process Lisp_Process;
349 struct stat; /* <sys/stat.h> */ 343 struct stat; /* <sys/stat.h> */
350 struct Lisp_Color_Instance;
351 typedef struct Lisp_Color_Instance Lisp_Color_Instance; 344 typedef struct Lisp_Color_Instance Lisp_Color_Instance;
352 struct Lisp_Font_Instance;
353 typedef struct Lisp_Font_Instance Lisp_Font_Instance; 345 typedef struct Lisp_Font_Instance Lisp_Font_Instance;
354 struct Lisp_Image_Instance;
355 typedef struct Lisp_Image_Instance Lisp_Image_Instance; 346 typedef struct Lisp_Image_Instance Lisp_Image_Instance;
356 struct Lisp_Gui_Item;
357 typedef struct Lisp_Gui_Item Lisp_Gui_Item; 347 typedef struct Lisp_Gui_Item Lisp_Gui_Item;
358 struct display_line; 348 struct display_line;
359 struct display_glyph_area; 349 struct display_glyph_area;
360 struct display_box; 350 struct display_box;
361 struct redisplay_info; 351 struct redisplay_info;
424 414
425 typedef struct 415 typedef struct
426 { 416 {
427 Dynarr_declare (struct console_type_entry); 417 Dynarr_declare (struct console_type_entry);
428 } console_type_entry_dynarr; 418 } console_type_entry_dynarr;
429
430 /* Need to declare this here. */
431 enum external_data_format
432 {
433 /* Binary format. This is the simplest format and is what we
434 use in the absence of a more appropriate format. This converts
435 according to the `binary' coding system:
436
437 a) On input, bytes 0 - 255 are converted into characters 0 - 255.
438 b) On output, characters 0 - 255 are converted into bytes 0 - 255
439 and other characters are converted into `X'.
440 */
441 FORMAT_BINARY,
442
443 /* Format used for filenames. In the original Mule, this is
444 user-definable with the `pathname-coding-system' variable.
445 For the moment, we just use the `binary' coding system. */
446 FORMAT_FILENAME,
447
448 /* Format used for output to the terminal. This should be controlled
449 by the `terminal-coding-system' variable. Under kterm, this will
450 be some ISO2022 system. On some DOS machines, this is Shift-JIS. */
451 FORMAT_TERMINAL,
452
453 /* Format used for input from the terminal. This should be controlled
454 by the `keyboard-coding-system' variable. */
455 FORMAT_KEYBOARD,
456
457 /* Format used for the external Unix environment -- argv[], stuff
458 from getenv(), stuff from the /etc/passwd file, etc.
459
460 Perhaps should be the same as FORMAT_FILENAME. */
461 FORMAT_OS,
462
463 /* Compound-text format. This is the standard X format used for
464 data stored in properties, selections, and the like. This is
465 an 8-bit no-lock-shift ISO2022 coding system. */
466 FORMAT_CTEXT
467 };
468
469 #define FORMAT_NATIVE FORMAT_FILENAME
470 419
471 enum run_hooks_condition 420 enum run_hooks_condition
472 { 421 {
473 RUN_HOOKS_TO_COMPLETION, 422 RUN_HOOKS_TO_COMPLETION,
474 RUN_HOOKS_UNTIL_SUCCESS, 423 RUN_HOOKS_UNTIL_SUCCESS,
1114 (((len) + LONGBITS_POWER_OF_2 - 1) >> LONGBITS_LOG2) 1063 (((len) + LONGBITS_POWER_OF_2 - 1) >> LONGBITS_LOG2)
1115 1064
1116 1065
1117 /*********** symbol ***********/ 1066 /*********** symbol ***********/
1118 1067
1068 typedef struct Lisp_Symbol Lisp_Symbol;
1119 struct Lisp_Symbol 1069 struct Lisp_Symbol
1120 { 1070 {
1121 struct lrecord_header lheader; 1071 struct lrecord_header lheader;
1122 /* next symbol in this obarray bucket */ 1072 /* next symbol in this obarray bucket */
1123 struct Lisp_Symbol *next; 1073 Lisp_Symbol *next;
1124 struct Lisp_String *name; 1074 Lisp_String *name;
1125 Lisp_Object value; 1075 Lisp_Object value;
1126 Lisp_Object function; 1076 Lisp_Object function;
1127 Lisp_Object plist; 1077 Lisp_Object plist;
1128 }; 1078 };
1129 typedef struct Lisp_Symbol Lisp_Symbol;
1130 1079
1131 #define SYMBOL_IS_KEYWORD(sym) \ 1080 #define SYMBOL_IS_KEYWORD(sym) \
1132 ((string_byte (symbol_name (XSYMBOL (sym)), 0) == ':') \ 1081 ((string_byte (symbol_name (XSYMBOL (sym)), 0) == ':') \
1133 && EQ (sym, oblookup (Vobarray, \ 1082 && EQ (sym, oblookup (Vobarray, \
1134 string_data (symbol_name (XSYMBOL (sym))), \ 1083 string_data (symbol_name (XSYMBOL (sym))), \
1175 ((Lisp_Object (*) (EXFUN_##max_args)) (subr)->subr_fn) 1124 ((Lisp_Object (*) (EXFUN_##max_args)) (subr)->subr_fn)
1176 #define subr_name(subr) ((subr)->name) 1125 #define subr_name(subr) ((subr)->name)
1177 1126
1178 /*********** marker ***********/ 1127 /*********** marker ***********/
1179 1128
1129 typedef struct Lisp_Marker Lisp_Marker;
1180 struct Lisp_Marker 1130 struct Lisp_Marker
1181 { 1131 {
1182 struct lrecord_header lheader; 1132 struct lrecord_header lheader;
1183 struct Lisp_Marker *next, *prev; 1133 Lisp_Marker *next;
1134 Lisp_Marker *prev;
1184 struct buffer *buffer; 1135 struct buffer *buffer;
1185 Memind memind; 1136 Memind memind;
1186 char insertion_type; 1137 char insertion_type;
1187 }; 1138 };
1188 typedef struct Lisp_Marker Lisp_Marker;
1189 1139
1190 DECLARE_LRECORD (marker, Lisp_Marker); 1140 DECLARE_LRECORD (marker, Lisp_Marker);
1191 #define XMARKER(x) XRECORD (x, marker, Lisp_Marker) 1141 #define XMARKER(x) XRECORD (x, marker, Lisp_Marker)
1192 #define XSETMARKER(x, p) XSETRECORD (x, p, marker) 1142 #define XSETMARKER(x, p) XSETRECORD (x, p, marker)
1193 #define MARKERP(x) RECORDP (x, marker) 1143 #define MARKERP(x) RECORDP (x, marker)
1360 x = wrong_type_argument (Qinteger_char_or_marker_p, x); \ 1310 x = wrong_type_argument (Qinteger_char_or_marker_p, x); \
1361 } while (0) 1311 } while (0)
1362 1312
1363 1313
1364 /*********** readonly objects ***********/ 1314 /*********** readonly objects ***********/
1365 1315
1366 #define CHECK_C_WRITEABLE(obj) \ 1316 #define CHECK_C_WRITEABLE(obj) \
1367 do { if (c_readonly (obj)) c_write_error (obj); } while (0) 1317 do { if (c_readonly (obj)) c_write_error (obj); } while (0)
1368 1318
1369 #define CHECK_LISP_WRITEABLE(obj) \ 1319 #define CHECK_LISP_WRITEABLE(obj) \
1370 do { if (lisp_readonly (obj)) lisp_write_error (obj); } while (0) 1320 do { if (lisp_readonly (obj)) lisp_write_error (obj); } while (0)
2029 Lisp_Object restore_gc_inhibit (Lisp_Object); 1979 Lisp_Object restore_gc_inhibit (Lisp_Object);
2030 extern EMACS_INT gc_generation_number[1]; 1980 extern EMACS_INT gc_generation_number[1];
2031 int c_readonly (Lisp_Object); 1981 int c_readonly (Lisp_Object);
2032 int lisp_readonly (Lisp_Object); 1982 int lisp_readonly (Lisp_Object);
2033 Lisp_Object build_string (CONST char *); 1983 Lisp_Object build_string (CONST char *);
2034 Lisp_Object build_ext_string (CONST char *, enum external_data_format); 1984 Lisp_Object build_ext_string (CONST char *, Lisp_Object);
2035 Lisp_Object build_translated_string (CONST char *); 1985 Lisp_Object build_translated_string (CONST char *);
2036 Lisp_Object make_string (CONST Bufbyte *, Bytecount); 1986 Lisp_Object make_string (CONST Bufbyte *, Bytecount);
2037 Lisp_Object make_ext_string (CONST Extbyte *, EMACS_INT, 1987 Lisp_Object make_ext_string (CONST Extbyte *, EMACS_INT, Lisp_Object);
2038 enum external_data_format);
2039 Lisp_Object make_uninit_string (Bytecount); 1988 Lisp_Object make_uninit_string (Bytecount);
2040 Lisp_Object make_float (double); 1989 Lisp_Object make_float (double);
2041 Lisp_Object make_string_nocopy (CONST Bufbyte *, Bytecount); 1990 Lisp_Object make_string_nocopy (CONST Bufbyte *, Bytecount);
2042 void free_cons (Lisp_Cons *); 1991 void free_cons (Lisp_Cons *);
2043 void free_list (Lisp_Object); 1992 void free_list (Lisp_Object);
2123 Lisp_Object emacs_doprnt_string_lisp_2 (CONST Bufbyte *, Lisp_Object, 2072 Lisp_Object emacs_doprnt_string_lisp_2 (CONST Bufbyte *, Lisp_Object,
2124 Bytecount, int, ...); 2073 Bytecount, int, ...);
2125 2074
2126 /* Defined in editfns.c */ 2075 /* Defined in editfns.c */
2127 void uncache_home_directory (void); 2076 void uncache_home_directory (void);
2128 char *get_home_directory (void); 2077 Extbyte *get_home_directory (void);
2129 char *user_login_name (uid_t *); 2078 char *user_login_name (uid_t *);
2130 Bufpos bufpos_clip_to_bounds (Bufpos, Bufpos, Bufpos); 2079 Bufpos bufpos_clip_to_bounds (Bufpos, Bufpos, Bufpos);
2131 Bytind bytind_clip_to_bounds (Bytind, Bytind, Bytind); 2080 Bytind bytind_clip_to_bounds (Bytind, Bytind, Bytind);
2132 void buffer_insert1 (struct buffer *, Lisp_Object); 2081 void buffer_insert1 (struct buffer *, Lisp_Object);
2133 Lisp_Object make_string_from_buffer (struct buffer *, Bufpos, Charcount); 2082 Lisp_Object make_string_from_buffer (struct buffer *, Bufpos, Charcount);
2284 2233
2285 2234
2286 /* Defined in events.c */ 2235 /* Defined in events.c */
2287 void clear_event_resource (void); 2236 void clear_event_resource (void);
2288 Lisp_Object allocate_event (void); 2237 Lisp_Object allocate_event (void);
2289 int event_to_character (Lisp_Event *, int, int, int);
2290 2238
2291 /* Defined in fileio.c */ 2239 /* Defined in fileio.c */
2292 void record_auto_save (void); 2240 void record_auto_save (void);
2293 void force_auto_save_soon (void); 2241 void force_auto_save_soon (void);
2294 DECLARE_DOESNT_RETURN (report_file_error (CONST char *, Lisp_Object)); 2242 DECLARE_DOESNT_RETURN (report_file_error (CONST char *, Lisp_Object));
2366 Lisp_Object encode_error_behavior_flag (Error_behavior); 2314 Lisp_Object encode_error_behavior_flag (Error_behavior);
2367 2315
2368 /* Defined in indent.c */ 2316 /* Defined in indent.c */
2369 int bi_spaces_at_point (struct buffer *, Bytind); 2317 int bi_spaces_at_point (struct buffer *, Bytind);
2370 int column_at_point (struct buffer *, Bufpos, int); 2318 int column_at_point (struct buffer *, Bufpos, int);
2371 int string_column_at_point (struct Lisp_String *, Bufpos, int); 2319 int string_column_at_point (Lisp_String *, Bufpos, int);
2372 int current_column (struct buffer *); 2320 int current_column (struct buffer *);
2373 void invalidate_current_column (void); 2321 void invalidate_current_column (void);
2374 Bufpos vmotion (struct window *, Bufpos, int, int *); 2322 Bufpos vmotion (struct window *, Bufpos, int, int *);
2375 Bufpos vmotion_pixels (Lisp_Object, Bufpos, int, int, int *); 2323 Bufpos vmotion_pixels (Lisp_Object, Bufpos, int, int, int *);
2376 2324
2442 void clear_message (void); 2390 void clear_message (void);
2443 2391
2444 /* Defined in print.c */ 2392 /* Defined in print.c */
2445 void write_string_to_stdio_stream (FILE *, struct console *, 2393 void write_string_to_stdio_stream (FILE *, struct console *,
2446 CONST Bufbyte *, Bytecount, Bytecount, 2394 CONST Bufbyte *, Bytecount, Bytecount,
2447 enum external_data_format); 2395 Lisp_Object);
2448 void debug_print (Lisp_Object); 2396 void debug_print (Lisp_Object);
2449 void debug_short_backtrace (int); 2397 void debug_short_backtrace (int);
2450 void temp_output_buffer_setup (Lisp_Object); 2398 void temp_output_buffer_setup (Lisp_Object);
2451 void temp_output_buffer_show (Lisp_Object, Lisp_Object); 2399 void temp_output_buffer_show (Lisp_Object, Lisp_Object);
2452 /* NOTE: Do not call this with the data of a Lisp_String. Use princ. 2400 /* NOTE: Do not call this with the data of a Lisp_String. Use princ.
2491 struct re_registers; 2439 struct re_registers;
2492 Bufpos scan_buffer (struct buffer *, Emchar, Bufpos, Bufpos, EMACS_INT, EMACS_INT *, int); 2440 Bufpos scan_buffer (struct buffer *, Emchar, Bufpos, Bufpos, EMACS_INT, EMACS_INT *, int);
2493 Bufpos find_next_newline (struct buffer *, Bufpos, int); 2441 Bufpos find_next_newline (struct buffer *, Bufpos, int);
2494 Bufpos find_next_newline_no_quit (struct buffer *, Bufpos, int); 2442 Bufpos find_next_newline_no_quit (struct buffer *, Bufpos, int);
2495 Bytind bi_find_next_newline_no_quit (struct buffer *, Bytind, int); 2443 Bytind bi_find_next_newline_no_quit (struct buffer *, Bytind, int);
2496 Bytind bi_find_next_emchar_in_string (struct Lisp_String*, Emchar, Bytind, EMACS_INT); 2444 Bytind bi_find_next_emchar_in_string (Lisp_String*, Emchar, Bytind, EMACS_INT);
2497 Bufpos find_before_next_newline (struct buffer *, Bufpos, Bufpos, int); 2445 Bufpos find_before_next_newline (struct buffer *, Bufpos, Bufpos, int);
2498 struct re_pattern_buffer *compile_pattern (Lisp_Object, struct re_registers *, 2446 struct re_pattern_buffer *compile_pattern (Lisp_Object, struct re_registers *,
2499 char *, int, Error_behavior); 2447 char *, int, Error_behavior);
2500 Bytecount fast_string_match (Lisp_Object, CONST Bufbyte *, 2448 Bytecount fast_string_match (Lisp_Object, CONST Bufbyte *,
2501 Lisp_Object, Bytecount, 2449 Lisp_Object, Bytecount,
2692 EXFUN (Flax_plist_remprop, 2); 2640 EXFUN (Flax_plist_remprop, 2);
2693 EXFUN (Flength, 1); 2641 EXFUN (Flength, 1);
2694 EXFUN (Fleq, MANY); 2642 EXFUN (Fleq, MANY);
2695 EXFUN (Flist, MANY); 2643 EXFUN (Flist, MANY);
2696 EXFUN (Flistp, 1); 2644 EXFUN (Flistp, 1);
2697 #ifdef HAVE_SHLIB
2698 EXFUN (Flist_modules, 0); 2645 EXFUN (Flist_modules, 0);
2699 EXFUN (Fload_module, 3); 2646 EXFUN (Fload_module, 3);
2700 #endif 2647 EXFUN (Flookup_key, 3);
2701 EXFUN (Flss, MANY); 2648 EXFUN (Flss, MANY);
2702 EXFUN (Fmake_byte_code, MANY); 2649 EXFUN (Fmake_byte_code, MANY);
2703 EXFUN (Fmake_coding_system, 4); 2650 EXFUN (Fmake_coding_system, 4);
2704 EXFUN (Fmake_glyph_internal, 1); 2651 EXFUN (Fmake_glyph_internal, 1);
2705 EXFUN (Fmake_list, 2); 2652 EXFUN (Fmake_list, 2);
2807 2754
2808 extern Lisp_Object Q_style, Qactually_requested, Qactivate_menubar_hook; 2755 extern Lisp_Object Q_style, Qactually_requested, Qactivate_menubar_hook;
2809 extern Lisp_Object Qafter, Qall, Qand; 2756 extern Lisp_Object Qafter, Qall, Qand;
2810 extern Lisp_Object Qarith_error, Qarrayp, Qassoc, Qat, Qautodetect, Qautoload; 2757 extern Lisp_Object Qarith_error, Qarrayp, Qassoc, Qat, Qautodetect, Qautoload;
2811 extern Lisp_Object Qbackground, Qbackground_pixmap, Qbad_variable, Qbefore; 2758 extern Lisp_Object Qbackground, Qbackground_pixmap, Qbad_variable, Qbefore;
2812 extern Lisp_Object Qbeginning_of_buffer, Qbig5, Qbinary, Qbitmap, Qbitp, Qblinking; 2759 extern Lisp_Object Qbeginning_of_buffer, Qbig5, Qbinary;
2813 extern Lisp_Object Qboolean, Qbottom, Qbuffer; 2760 extern Lisp_Object Qbitmap, Qbitp, Qblinking;
2761 extern Lisp_Object Qboolean, Qbottom, Qbottom_margin, Qbuffer;
2814 extern Lisp_Object Qbuffer_glyph_p, Qbuffer_live_p, Qbuffer_read_only, Qbutton; 2762 extern Lisp_Object Qbuffer_glyph_p, Qbuffer_live_p, Qbuffer_read_only, Qbutton;
2815 extern Lisp_Object Qbyte_code, Qcall_interactively, Qcategory; 2763 extern Lisp_Object Qbyte_code, Qcall_interactively, Qcategory;
2816 extern Lisp_Object Qcategory_designator_p, Qcategory_table_value_p, Qccl, Qcdr; 2764 extern Lisp_Object Qcategory_designator_p, Qcategory_table_value_p, Qccl, Qcdr;
2817 extern Lisp_Object Qchannel, Qchar, Qchar_or_string_p, Qcharacter, Qcharacterp; 2765 extern Lisp_Object Qchannel, Qchar, Qchar_or_string_p, Qcharacter, Qcharacterp;
2818 extern Lisp_Object Qchars, Qcharset_g0, Qcharset_g1, Qcharset_g2, Qcharset_g3; 2766 extern Lisp_Object Qchars, Qcharset_g0, Qcharset_g1, Qcharset_g2, Qcharset_g3;
2819 extern Lisp_Object Qcenter, Qcircular_list, Qcircular_property_list; 2767 extern Lisp_Object Qcenter, Qcircular_list, Qcircular_property_list;
2820 extern Lisp_Object Qcoding_system_error; 2768 extern Lisp_Object Qcoding_system_error;
2821 extern Lisp_Object Qcolor, Qcolor_pixmap_image_instance_p; 2769 extern Lisp_Object Qcolor, Qcolor_pixmap_image_instance_p;
2822 extern Lisp_Object Qcolumns, Qcommand, Qcommandp, Qcompletion_ignore_case; 2770 extern Lisp_Object Qcolumns, Qcommand, Qcommandp, Qcompletion_ignore_case;
2823 extern Lisp_Object Qconsole, Qconsole_live_p, Qconst_specifier, Qcr, Qcritical; 2771 extern Lisp_Object Qconsole, Qconsole_live_p, Qconst_specifier, Qcr, Qcritical;
2824 extern Lisp_Object Qcrlf, Qctext, Qcurrent_menubar, Qcursor; 2772 extern Lisp_Object Qcrlf, Qctext, Qcurrent_menubar, Qctext, Qcursor;
2825 extern Lisp_Object Qcyclic_variable_indirection, Qdata, Qdead, Qdecode; 2773 extern Lisp_Object Qcyclic_variable_indirection, Qdata, Qdead, Qdecode;
2826 extern Lisp_Object Qdefault, Qdefun, Qdelete, Qdelq, Qdevice, Qdevice_live_p; 2774 extern Lisp_Object Qdefault, Qdefun, Qdelete, Qdelq, Qdevice, Qdevice_live_p;
2827 extern Lisp_Object Qdim, Qdimension, Qdisabled, Qdisplay, Qdisplay_table; 2775 extern Lisp_Object Qdim, Qdimension, Qdisabled, Qdisplay, Qdisplay_table;
2828 extern Lisp_Object Qdoc_string, Qdomain_error, Qdynarr_overhead; 2776 extern Lisp_Object Qdoc_string, Qdomain_error, Qduplex, Qdynarr_overhead;
2829 extern Lisp_Object Qempty, Qencode, Qend_of_buffer, Qend_of_file, Qend_open; 2777 extern Lisp_Object Qempty, Qencode, Qend_of_buffer, Qend_of_file, Qend_open;
2830 extern Lisp_Object Qeol_cr, Qeol_crlf, Qeol_lf, Qeol_type, Qeq, Qeql, Qequal; 2778 extern Lisp_Object Qeol_cr, Qeol_crlf, Qeol_lf, Qeol_type, Qeq, Qeql, Qequal;
2831 extern Lisp_Object Qerror, Qerror_conditions, Qerror_message, Qescape_quoted; 2779 extern Lisp_Object Qerror, Qerror_conditions, Qerror_message, Qescape_quoted;
2832 extern Lisp_Object Qeval, Qevent_live_p, Qexit, Qextent_live_p, Qextents; 2780 extern Lisp_Object Qeval, Qevent_live_p, Qexit, Qextent_live_p, Qextents;
2833 extern Lisp_Object Qexternal_debugging_output, Qface, Qfeaturep, Qfile_error; 2781 extern Lisp_Object Qexternal_debugging_output, Qface, Qfeaturep;
2782 extern Lisp_Object Qfile_name, Qfile_error;
2834 extern Lisp_Object Qfont, Qforce_g0_on_output, Qforce_g1_on_output; 2783 extern Lisp_Object Qfont, Qforce_g0_on_output, Qforce_g1_on_output;
2835 extern Lisp_Object Qforce_g2_on_output, Qforce_g3_on_output, Qforeground; 2784 extern Lisp_Object Qforce_g2_on_output, Qforce_g3_on_output, Qforeground;
2836 extern Lisp_Object Qformat, Qframe, Qframe_live_p, Qfunction, Qgap_overhead; 2785 extern Lisp_Object Qformat, Qframe, Qframe_live_p, Qfunction, Qgap_overhead;
2837 extern Lisp_Object Qgeneric, Qgeometry, Qglobal, Qheight, Qhighlight, Qhorizontal, Qicon; 2786 extern Lisp_Object Qgeneric, Qgeometry, Qglobal, Qheight;
2787 extern Lisp_Object Qhighlight, Qhorizontal, Qicon;
2838 extern Lisp_Object Qicon_glyph_p, Qid, Qidentity, Qimage, Qinfo, Qinherit; 2788 extern Lisp_Object Qicon_glyph_p, Qid, Qidentity, Qimage, Qinfo, Qinherit;
2839 extern Lisp_Object Qinhibit_quit, Qinhibit_read_only; 2789 extern Lisp_Object Qinhibit_quit, Qinhibit_read_only;
2840 extern Lisp_Object Qinput_charset_conversion, Qinteger; 2790 extern Lisp_Object Qinput_charset_conversion, Qinteger;
2841 extern Lisp_Object Qinteger_char_or_marker_p, Qinteger_or_char_p; 2791 extern Lisp_Object Qinteger_char_or_marker_p, Qinteger_or_char_p;
2842 extern Lisp_Object Qinteger_or_marker_p, Qintegerp, Qinteractive, Qinternal; 2792 extern Lisp_Object Qinteger_or_marker_p, Qintegerp, Qinteractive, Qinternal;
2843 extern Lisp_Object Qinvalid_function, Qinvalid_read_syntax, Qio_error; 2793 extern Lisp_Object Qinvalid_function, Qinvalid_read_syntax, Qio_error;
2844 extern Lisp_Object Qiso2022, Qkey, Qkey_assoc, Qkeymap, Qlambda, Qlayout, Qleft, Qlf; 2794 extern Lisp_Object Qiso2022, Qkey, Qkey_assoc, Qkeyboard, Qkeymap;
2795 extern Lisp_Object Qlambda, Qlayout, Qlandscape, Qleft, Qleft_margin, Qlf;
2845 extern Lisp_Object Qlist, Qlistp, Qload, Qlock_shift, Qmacro, Qmagic; 2796 extern Lisp_Object Qlist, Qlistp, Qload, Qlock_shift, Qmacro, Qmagic;
2846 extern Lisp_Object Qmalformed_list, Qmalformed_property_list; 2797 extern Lisp_Object Qmakunbound, Qmalformed_list, Qmalformed_property_list;
2847 extern Lisp_Object Qmalloc_overhead, Qmark, Qmarkers; 2798 extern Lisp_Object Qmalloc_overhead, Qmark, Qmarkers;
2848 extern Lisp_Object Qmax, Qmemory, Qmessage, Qminus, Qmnemonic, Qmodifiers; 2799 extern Lisp_Object Qmax, Qmemory, Qmessage, Qminus, Qmnemonic, Qmodifiers;
2849 extern Lisp_Object Qmono_pixmap_image_instance_p, Qmotion; 2800 extern Lisp_Object Qmono_pixmap_image_instance_p, Qmotion;
2850 extern Lisp_Object Qmouse_leave_buffer_hook, Qmswindows, Qname, Qnas, Qnatnump; 2801 extern Lisp_Object Qmouse_leave_buffer_hook, Qmsprinter, Qmswindows;
2802 extern Lisp_Object Qname, Qnas, Qnatnump;
2851 extern Lisp_Object Qno_ascii_cntl, Qno_ascii_eol, Qno_catch; 2803 extern Lisp_Object Qno_ascii_cntl, Qno_ascii_eol, Qno_catch;
2852 extern Lisp_Object Qno_conversion, Qno_iso6429, Qnone, Qnot, Qnothing; 2804 extern Lisp_Object Qno_conversion, Qno_iso6429, Qnone, Qnot, Qnothing;
2853 extern Lisp_Object Qnothing_image_instance_p, Qnotice; 2805 extern Lisp_Object Qnothing_image_instance_p, Qnotice;
2854 extern Lisp_Object Qnumber_char_or_marker_p, Qnumberp; 2806 extern Lisp_Object Qnumber_char_or_marker_p, Qnumberp;
2855 extern Lisp_Object Qobject, Qold_assoc, Qold_delete, Qold_delq, Qold_rassoc; 2807 extern Lisp_Object Qobject, Qold_assoc, Qold_delete, Qold_delq, Qold_rassoc;
2856 extern Lisp_Object Qold_rassq, Qonly, Qor, Qother, Qoutput_charset_conversion; 2808 extern Lisp_Object Qold_rassq, Qonly, Qor, Qother;
2809 extern Lisp_Object Qorientation, Qoutput_charset_conversion;
2857 extern Lisp_Object Qoverflow_error, Qpoint, Qpointer, Qpointer_glyph_p; 2810 extern Lisp_Object Qoverflow_error, Qpoint, Qpointer, Qpointer_glyph_p;
2858 extern Lisp_Object Qpointer_image_instance_p, Qpost_read_conversion; 2811 extern Lisp_Object Qpointer_image_instance_p, Qportrait, Qpost_read_conversion;
2859 extern Lisp_Object Qpre_write_conversion, Qprint, Qprint_length; 2812 extern Lisp_Object Qpre_write_conversion, Qprint, Qprint_length;
2860 extern Lisp_Object Qprint_string_length, Qprocess, Qprogn, Qprovide, Qquit; 2813 extern Lisp_Object Qprint_string_length, Qprocess, Qprogn, Qprovide, Qquit;
2861 extern Lisp_Object Qquote, Qrange_error, Qrassoc, Qrassq, Qread_char; 2814 extern Lisp_Object Qquote, Qrange_error, Qrassoc, Qrassq, Qread_char;
2862 extern Lisp_Object Qread_from_minibuffer, Qreally_early_error_handler; 2815 extern Lisp_Object Qread_from_minibuffer, Qreally_early_error_handler;
2863 extern Lisp_Object Qregion_beginning, Qregion_end, Qrequire, Qresource; 2816 extern Lisp_Object Qregion_beginning, Qregion_end, Qrequire, Qresource;
2864 extern Lisp_Object Qreturn, Qreverse, Qright, Qrun_hooks, Qsans_modifiers; 2817 extern Lisp_Object Qreturn, Qreverse, Qright, Qright_margin;
2818 extern Lisp_Object Qrun_hooks, Qsans_modifiers;
2865 extern Lisp_Object Qsave_buffers_kill_emacs, Qsearch, Qselected; 2819 extern Lisp_Object Qsave_buffers_kill_emacs, Qsearch, Qselected;
2866 extern Lisp_Object Qself_insert_command, Qself_insert_defer_undo; 2820 extern Lisp_Object Qself_insert_command, Qself_insert_defer_undo;
2867 extern Lisp_Object Qsequencep, Qsetting_constant, Qseven, Qshift_jis, Qshort; 2821 extern Lisp_Object Qsequencep, Qset, Qsetting_constant;
2822 extern Lisp_Object Qseven, Qshift_jis, Qshort;
2868 extern Lisp_Object Qsignal, Qsimple, Qsingularity_error, Qsize, Qspace; 2823 extern Lisp_Object Qsignal, Qsimple, Qsingularity_error, Qsize, Qspace;
2869 extern Lisp_Object Qspecifier, Qstandard_input, Qstandard_output, Qstart_open; 2824 extern Lisp_Object Qspecifier, Qstandard_input, Qstandard_output, Qstart_open;
2870 extern Lisp_Object Qstream, Qstring, Qstring_lessp, Qsubwindow; 2825 extern Lisp_Object Qstream, Qstring, Qstring_lessp, Qsubwindow;
2871 extern Lisp_Object Qsubwindow_image_instance_p, Qsymbol, Qsyntax, Qt, Qtest; 2826 extern Lisp_Object Qsubwindow_image_instance_p;
2827 extern Lisp_Object Qsymbol, Qsyntax, Qt, Qterminal, Qtest;
2872 extern Lisp_Object Qtext, Qtext_image_instance_p, Qtimeout, Qtimestamp; 2828 extern Lisp_Object Qtext, Qtext_image_instance_p, Qtimeout, Qtimestamp;
2873 extern Lisp_Object Qtoolbar, Qtop, Qtop_level, Qtrue_list_p, Qtty, Qtype; 2829 extern Lisp_Object Qtoolbar, Qtop, Qtop_margin, Qtop_level;
2830 extern Lisp_Object Qtrue_list_p, Qtty, Qtype;
2874 extern Lisp_Object Qunbound, Qundecided, Qundefined, Qunderflow_error; 2831 extern Lisp_Object Qunbound, Qundecided, Qundefined, Qunderflow_error;
2875 extern Lisp_Object Qunderline, Qunimplemented, Quser_files_and_directories; 2832 extern Lisp_Object Qunderline, Qunimplemented, Quser_files_and_directories;
2876 extern Lisp_Object Qvalue_assoc, Qvalues; 2833 extern Lisp_Object Qvalue_assoc, Qvalues;
2877 extern Lisp_Object Qvariable_documentation, Qvariable_domain, Qvertical; 2834 extern Lisp_Object Qvariable_documentation, Qvariable_domain, Qvertical;
2878 extern Lisp_Object Qvoid_function, Qvoid_variable, Qwarning, Qwidth, Qwidget, Qwindow; 2835 extern Lisp_Object Qvoid_function, Qvoid_variable, Qwarning;
2836 extern Lisp_Object Qwidth, Qwidget, Qwindow;
2879 extern Lisp_Object Qwindow_live_p, Qwindow_system, Qwrong_number_of_arguments; 2837 extern Lisp_Object Qwindow_live_p, Qwindow_system, Qwrong_number_of_arguments;
2880 extern Lisp_Object Qwrong_type_argument, Qx, Qy, Qyes_or_no_p; 2838 extern Lisp_Object Qwrong_type_argument, Qx, Qy, Qyes_or_no_p;
2881 extern Lisp_Object Vactivate_menubar_hook, Vascii_canon_table; 2839 extern Lisp_Object Vactivate_menubar_hook, Vascii_canon_table;
2882 extern Lisp_Object Vascii_downcase_table, Vascii_eqv_table; 2840 extern Lisp_Object Vascii_downcase_table, Vascii_eqv_table;
2883 extern Lisp_Object Vascii_upcase_table, Vautoload_queue, Vbinary_process_input; 2841 extern Lisp_Object Vascii_upcase_table, Vautoload_queue, Vblank_menubar;
2884 extern Lisp_Object Vbinary_process_output, Vblank_menubar;
2885 extern Lisp_Object Vcharset_ascii, Vcharset_composite, Vcharset_control_1; 2842 extern Lisp_Object Vcharset_ascii, Vcharset_composite, Vcharset_control_1;
2886 extern Lisp_Object Vcoding_system_for_read, Vcoding_system_for_write; 2843 extern Lisp_Object Vcoding_system_for_read, Vcoding_system_for_write;
2887 extern Lisp_Object Vcoding_system_hash_table, Vcommand_history; 2844 extern Lisp_Object Vcoding_system_hash_table, Vcommand_history;
2888 extern Lisp_Object Vcommand_line_args, Vconfigure_info_directory; 2845 extern Lisp_Object Vcommand_line_args, Vconfigure_info_directory;
2889 extern Lisp_Object Vconfigure_site_directory, Vconfigure_site_module_directory; 2846 extern Lisp_Object Vconfigure_site_directory, Vconfigure_site_module_directory;
2912 extern Lisp_Object Vrecent_keys_ring, Vshell_file_name, Vsite_directory; 2869 extern Lisp_Object Vrecent_keys_ring, Vshell_file_name, Vsite_directory;
2913 extern Lisp_Object Vsite_module_directory; 2870 extern Lisp_Object Vsite_module_directory;
2914 extern Lisp_Object Vstandard_input, Vstandard_output, Vstdio_str; 2871 extern Lisp_Object Vstandard_input, Vstandard_output, Vstdio_str;
2915 extern Lisp_Object Vsynchronous_sounds, Vsystem_name, Vterminal_coding_system; 2872 extern Lisp_Object Vsynchronous_sounds, Vsystem_name, Vterminal_coding_system;
2916 extern Lisp_Object Vthis_command_keys, Vunread_command_event; 2873 extern Lisp_Object Vthis_command_keys, Vunread_command_event;
2917 extern Lisp_Object Vwin32_generate_fake_inodes, Vwin32_pipe_read_delay;
2918 extern Lisp_Object Vx_initial_argv_list; 2874 extern Lisp_Object Vx_initial_argv_list;
2919 2875
2920 extern Lisp_Object Qmakunbound, Qset; 2876 #endif /* INCLUDED_lisp_h_ */
2921
2922 #endif /* _XEMACS_LISP_H_ */