Mercurial > emacs
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); |