comparison src/lisp.h @ 43713:f92c4d87863a

Change defvar_int def and vars to use EMACS_INT instead of just int.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Mon, 04 Mar 2002 23:41:00 +0000
parents 31640016ebe2
children 412b8fa3fd95
comparison
equal deleted inserted replaced
43712:223f1f5d160d 43713:f92c4d87863a
1066 specified int variable. */ 1066 specified int variable. */
1067 struct Lisp_Intfwd 1067 struct Lisp_Intfwd
1068 { 1068 {
1069 int type : 16; /* = Lisp_Misc_Intfwd */ 1069 int type : 16; /* = Lisp_Misc_Intfwd */
1070 int spacer : 16; 1070 int spacer : 16;
1071 int *intvar; 1071 EMACS_INT *intvar;
1072 }; 1072 };
1073 1073
1074 /* Boolean forwarding pointer to an int variable. 1074 /* Boolean forwarding pointer to an int variable.
1075 This is like Lisp_Intfwd except that the ostensible 1075 This is like Lisp_Intfwd except that the ostensible
1076 "value" of the symbol is t if the int variable is nonzero, 1076 "value" of the symbol is t if the int variable is nonzero,
1596 #define UNEVALLED -1 1596 #define UNEVALLED -1
1597 1597
1598 extern void defvar_lisp P_ ((char *, Lisp_Object *)); 1598 extern void defvar_lisp P_ ((char *, Lisp_Object *));
1599 extern void defvar_lisp_nopro P_ ((char *, Lisp_Object *)); 1599 extern void defvar_lisp_nopro P_ ((char *, Lisp_Object *));
1600 extern void defvar_bool P_ ((char *, int *)); 1600 extern void defvar_bool P_ ((char *, int *));
1601 extern void defvar_int P_ ((char *, int *)); 1601 extern void defvar_int P_ ((char *, EMACS_INT *));
1602 extern void defvar_per_buffer P_ ((char *, Lisp_Object *, Lisp_Object, char *)); 1602 extern void defvar_per_buffer P_ ((char *, Lisp_Object *, Lisp_Object, char *));
1603 extern void defvar_kboard P_ ((char *, int)); 1603 extern void defvar_kboard P_ ((char *, int));
1604 1604
1605 /* Macros we use to define forwarded Lisp variables. 1605 /* Macros we use to define forwarded Lisp variables.
1606 These are used in the syms_of_FILENAME functions. */ 1606 These are used in the syms_of_FILENAME functions. */
1651 1651
1652 extern struct specbinding *specpdl; 1652 extern struct specbinding *specpdl;
1653 extern struct specbinding *specpdl_ptr; 1653 extern struct specbinding *specpdl_ptr;
1654 extern int specpdl_size; 1654 extern int specpdl_size;
1655 1655
1656 extern int max_specpdl_size; 1656 extern EMACS_INT max_specpdl_size;
1657 1657
1658 #define BINDING_STACK_SIZE() (specpdl_ptr - specpdl) 1658 #define BINDING_STACK_SIZE() (specpdl_ptr - specpdl)
1659 1659
1660 /* Everything needed to describe an active condition case. */ 1660 /* Everything needed to describe an active condition case. */
1661 struct handler 1661 struct handler
1761 1761
1762 extern int consing_since_gc; 1762 extern int consing_since_gc;
1763 1763
1764 /* Threshold for doing another gc. */ 1764 /* Threshold for doing another gc. */
1765 1765
1766 extern int gc_cons_threshold; 1766 extern EMACS_INT gc_cons_threshold;
1767 1767
1768 /* Structure for recording stack slots that need marking. */ 1768 /* Structure for recording stack slots that need marking. */
1769 1769
1770 /* This is a chain of structures, each of which points at a Lisp_Object variable 1770 /* This is a chain of structures, each of which points at a Lisp_Object variable
1771 whose value should be marked in garbage collection. 1771 whose value should be marked in garbage collection.
2119 extern void syms_of_coding P_ ((void)); 2119 extern void syms_of_coding P_ ((void));
2120 extern Lisp_Object code_convert_string_norecord P_ ((Lisp_Object, Lisp_Object, 2120 extern Lisp_Object code_convert_string_norecord P_ ((Lisp_Object, Lisp_Object,
2121 int)); 2121 int));
2122 2122
2123 /* Defined in charset.c */ 2123 /* Defined in charset.c */
2124 extern int nonascii_insert_offset; 2124 extern EMACS_INT nonascii_insert_offset;
2125 extern Lisp_Object Vnonascii_translation_table; 2125 extern Lisp_Object Vnonascii_translation_table;
2126 EXFUN (Fchar_bytes, 1); 2126 EXFUN (Fchar_bytes, 1);
2127 EXFUN (Fchar_width, 1); 2127 EXFUN (Fchar_width, 1);
2128 EXFUN (Fstring, MANY); 2128 EXFUN (Fstring, MANY);
2129 extern int chars_in_text P_ ((unsigned char *, int)); 2129 extern int chars_in_text P_ ((unsigned char *, int));
2287 extern void replace_range P_ ((int, int, Lisp_Object, int, int, int)); 2287 extern void replace_range P_ ((int, int, Lisp_Object, int, int, int));
2288 extern void syms_of_insdel P_ ((void)); 2288 extern void syms_of_insdel P_ ((void));
2289 2289
2290 /* Defined in dispnew.c */ 2290 /* Defined in dispnew.c */
2291 extern Lisp_Object selected_frame; 2291 extern Lisp_Object selected_frame;
2292 extern EMACS_INT baud_rate;
2292 EXFUN (Fding, 1); 2293 EXFUN (Fding, 1);
2293 EXFUN (Fredraw_frame, 1); 2294 EXFUN (Fredraw_frame, 1);
2294 EXFUN (Fredraw_display, 0); 2295 EXFUN (Fredraw_display, 0);
2295 EXFUN (Fsleep_for, 2); 2296 EXFUN (Fsleep_for, 2);
2296 EXFUN (Fsit_for, 3); 2297 EXFUN (Fsit_for, 3);