Mercurial > hg > xemacs-beta

comparison src/lisp.h @ 446:1ccc32a20af4 r21-2-38

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-38
author cvs
date Mon, 13 Aug 2007 11:37:21 +0200
parents 576fb035e263
children 3d3049ae1304
comparison
equal deleted inserted replaced
445:34f3776fcf0e 446:1ccc32a20af4
278 278
279 /* ------------------------------- */ 279 /* ------------------------------- */
280 /* basic char/int typedefs */ 280 /* basic char/int typedefs */
281 /* ------------------------------- */ 281 /* ------------------------------- */
282 282
283 /* The definitions we put here use typedefs to convey additional meaning to 283 /* The definitions we put here use typedefs to attribute specific meaning
284 types that by themselves are pretty general. Stuff pointed to by a 284 to types that by themselves are pretty general. Stuff pointed to by a
285 char * or unsigned char * will nearly always be one of four types: 285 char * or unsigned char * will nearly always be one of four types:
286 a) pointer to internally-formatted text; b) pointer to text in some 286 a) pointer to internally-formatted text; b) pointer to text in some
287 external format, which can be defined as all formats other than the 287 external format, which can be defined as all formats other than the
288 internal one; c) pure ASCII text; d) binary data that is not meant to 288 internal one; c) pure ASCII text; d) binary data that is not meant to
289 be interpreted as text. [A fifth possible type "e) a general pointer 289 be interpreted as text. [A fifth possible type "e) a general pointer
290 to memory" should be replaced with void *.] By using these more specific 290 to memory" should be replaced with void *.] Using these more specific
291 types in lieu of the general ones, you clear up greatly the confusions 291 types rather than the general ones helps avoid the confusions that
292 that inevitably will occur when it's not clearly known the semantics of 292 occur when the semantics of a char * argument being studied are unclear. */
293 a char * argument being studied. */
294 293
295 typedef unsigned char UChar; 294 typedef unsigned char UChar;
296 295
297 /* The data representing the text in a buffer is logically a set 296 /* The data representing the text in a buffer is logically a set
298 of Bufbytes, declared as follows. */ 297 of Bufbytes, declared as follows. */
2728 /* Same goes for this function. */ 2727 /* Same goes for this function. */
2729 void write_string_1 (const Bufbyte *, Bytecount, Lisp_Object); 2728 void write_string_1 (const Bufbyte *, Bytecount, Lisp_Object);
2730 void print_cons (Lisp_Object, Lisp_Object, int); 2729 void print_cons (Lisp_Object, Lisp_Object, int);
2731 void print_vector (Lisp_Object, Lisp_Object, int); 2730 void print_vector (Lisp_Object, Lisp_Object, int);
2732 void print_string (Lisp_Object, Lisp_Object, int); 2731 void print_string (Lisp_Object, Lisp_Object, int);
2733 void long_to_string (char *, long); 2732 char *long_to_string (char *, long);
2734 void print_internal (Lisp_Object, Lisp_Object, int); 2733 void print_internal (Lisp_Object, Lisp_Object, int);
2735 void print_symbol (Lisp_Object, Lisp_Object, int); 2734 void print_symbol (Lisp_Object, Lisp_Object, int);
2736 void print_float (Lisp_Object, Lisp_Object, int); 2735 void print_float (Lisp_Object, Lisp_Object, int);
2737 extern int print_escape_newlines; 2736 extern int print_escape_newlines;
2738 extern int print_readably; 2737 extern int print_readably;
2766 Bufpos find_next_newline_no_quit (struct buffer *, Bufpos, int); 2765 Bufpos find_next_newline_no_quit (struct buffer *, Bufpos, int);
2767 Bytind bi_find_next_newline_no_quit (struct buffer *, Bytind, int); 2766 Bytind bi_find_next_newline_no_quit (struct buffer *, Bytind, int);
2768 Bytind bi_find_next_emchar_in_string (Lisp_String*, Emchar, Bytind, EMACS_INT); 2767 Bytind bi_find_next_emchar_in_string (Lisp_String*, Emchar, Bytind, EMACS_INT);
2769 Bufpos find_before_next_newline (struct buffer *, Bufpos, Bufpos, int); 2768 Bufpos find_before_next_newline (struct buffer *, Bufpos, Bufpos, int);
2770 struct re_pattern_buffer *compile_pattern (Lisp_Object, struct re_registers *, 2769 struct re_pattern_buffer *compile_pattern (Lisp_Object, struct re_registers *,
2771 char *, int, Error_behavior); 2770 Lisp_Object, int, Error_behavior);
2772 Bytecount fast_string_match (Lisp_Object, const Bufbyte *, 2771 Bytecount fast_string_match (Lisp_Object, const Bufbyte *,
2773 Lisp_Object, Bytecount, 2772 Lisp_Object, Bytecount,
2774 Bytecount, int, Error_behavior, int); 2773 Bytecount, int, Error_behavior, int);
2775 Bytecount fast_lisp_string_match (Lisp_Object, Lisp_Object); 2774 Bytecount fast_lisp_string_match (Lisp_Object, Lisp_Object);
2776 void restore_match_data (void); 2775 void restore_match_data (void);
3180 #undef SYMBOL_KEYWORD 3179 #undef SYMBOL_KEYWORD
3181 #undef SYMBOL_GENERAL 3180 #undef SYMBOL_GENERAL
3182 3181
3183 /*--------------- prototypes for variables of type Lisp_Object ------------*/ 3182 /*--------------- prototypes for variables of type Lisp_Object ------------*/
3184 3183
3185 extern Lisp_Object Vactivate_menubar_hook, Vascii_canon_table; 3184 extern Lisp_Object Vactivate_menubar_hook;
3186 extern Lisp_Object Vascii_downcase_table, Vascii_eqv_table; 3185 extern Lisp_Object Vautoload_queue, Vblank_menubar;
3187 extern Lisp_Object Vascii_upcase_table, Vautoload_queue, Vblank_menubar;
3188 extern Lisp_Object Vcharset_ascii, Vcharset_composite, Vcharset_control_1; 3186 extern Lisp_Object Vcharset_ascii, Vcharset_composite, Vcharset_control_1;
3189 extern Lisp_Object Vcoding_system_for_read, Vcoding_system_for_write; 3187 extern Lisp_Object Vcoding_system_for_read, Vcoding_system_for_write;
3190 extern Lisp_Object Vcoding_system_hash_table, Vcommand_history; 3188 extern Lisp_Object Vcoding_system_hash_table, Vcommand_history;
3191 extern Lisp_Object Vcommand_line_args, Vconfigure_info_directory; 3189 extern Lisp_Object Vcommand_line_args, Vconfigure_info_directory;
3192 extern Lisp_Object Vconfigure_site_directory, Vconfigure_site_module_directory; 3190 extern Lisp_Object Vconfigure_site_directory, Vconfigure_site_module_directory;
3204 extern Lisp_Object Vlast_command_event, Vlast_input_event; 3202 extern Lisp_Object Vlast_command_event, Vlast_input_event;
3205 extern Lisp_Object Vload_file_name_internal; 3203 extern Lisp_Object Vload_file_name_internal;
3206 extern Lisp_Object Vload_file_name_internal_the_purecopy, Vload_history; 3204 extern Lisp_Object Vload_file_name_internal_the_purecopy, Vload_history;
3207 extern Lisp_Object Vload_path, Vmark_even_if_inactive, Vmenubar_configuration; 3205 extern Lisp_Object Vload_path, Vmark_even_if_inactive, Vmenubar_configuration;
3208 extern Lisp_Object Vminibuf_preprompt, Vminibuf_prompt, Vminibuffer_zero; 3206 extern Lisp_Object Vminibuf_preprompt, Vminibuf_prompt, Vminibuffer_zero;
3209 extern Lisp_Object Vmirror_ascii_canon_table, Vmirror_ascii_downcase_table;
3210 extern Lisp_Object Vmirror_ascii_eqv_table, Vmirror_ascii_upcase_table;
3211 extern Lisp_Object Vmodule_directory, Vmswindows_downcase_file_names; 3207 extern Lisp_Object Vmodule_directory, Vmswindows_downcase_file_names;
3212 extern Lisp_Object Vmswindows_get_true_file_attributes, Vobarray; 3208 extern Lisp_Object Vmswindows_get_true_file_attributes, Vobarray;
3213 extern Lisp_Object Vprint_length, Vprint_level, Vprocess_environment; 3209 extern Lisp_Object Vprint_length, Vprint_level, Vprocess_environment;
3214 extern Lisp_Object Vquit_flag; 3210 extern Lisp_Object Vquit_flag;
3215 extern Lisp_Object Vrecent_keys_ring, Vshell_file_name, Vsite_directory; 3211 extern Lisp_Object Vrecent_keys_ring, Vshell_file_name, Vsite_directory;