Mercurial > hg > xemacs-beta

comparison src/lisp.h @ 1983:9c872f33ecbe

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2004-04-05 22:49:31 by james] Add bignum, ratio, and bigfloat support.
author james
date Mon, 05 Apr 2004 22:50:11 +0000
parents 59e1bbea04fe
children 83276542ee26
comparison
equal deleted inserted replaced
1982:a748951fd4fb 1983:9c872f33ecbe
3375 /************************************************************************/ 3375 /************************************************************************/
3376 /* Misc definitions */ 3376 /* Misc definitions */
3377 /************************************************************************/ 3377 /************************************************************************/
3378 3378
3379 /************************************************************************/ 3379 /************************************************************************/
3380 /* Other numeric types */
3381 /************************************************************************/
3382 #ifdef WITH_NUMBER_TYPES
3383 #include "number.h"
3384 #endif
3385
3386
3387 /************************************************************************/
3380 /* prototypes */ 3388 /* prototypes */
3381 /************************************************************************/ 3389 /************************************************************************/
3382 3390
3383 /* NOTE: Prototypes should go HERE, not in various header files, unless 3391 /* NOTE: Prototypes should go HERE, not in various header files, unless
3384 they specifically reference a type that's not defined in lisp.h. 3392 they specifically reference a type that's not defined in lisp.h.
4331 void ebolify_bytecode_constants (Lisp_Object); 4339 void ebolify_bytecode_constants (Lisp_Object);
4332 void close_load_descs (void); 4340 void close_load_descs (void);
4333 int locate_file (Lisp_Object, Lisp_Object, Lisp_Object, Lisp_Object *, int); 4341 int locate_file (Lisp_Object, Lisp_Object, Lisp_Object, Lisp_Object *, int);
4334 EXFUN (Flocate_file_clear_hashing, 1); 4342 EXFUN (Flocate_file_clear_hashing, 1);
4335 int isfloat_string (const char *); 4343 int isfloat_string (const char *);
4344 #ifdef HAVE_RATIO
4345 int isratio_string (const char *);
4346 #endif
4336 4347
4337 /* Well, I've decided to enable this. -- ben */ 4348 /* Well, I've decided to enable this. -- ben */
4338 /* And I've decided to make it work right. -- sb */ 4349 /* And I've decided to make it work right. -- sb */
4339 #define LOADHIST 4350 #define LOADHIST
4340 /* Define the following symbol to enable load history of dumped files */ 4351 /* Define the following symbol to enable load history of dumped files */
5060 extern Lisp_Object Qlayout, Qlist_formation_error, Qlistp, Qload; 5071 extern Lisp_Object Qlayout, Qlist_formation_error, Qlistp, Qload;
5061 extern Lisp_Object Qlong_name, Qmacro, Qmakunbound, Qmalformed_list; 5072 extern Lisp_Object Qlong_name, Qmacro, Qmakunbound, Qmalformed_list;
5062 extern Lisp_Object Qmalformed_property_list, Qmark, Qmodule; 5073 extern Lisp_Object Qmalformed_property_list, Qmark, Qmodule;
5063 extern Lisp_Object Qmono_pixmap_image_instance_p, Qmouse_leave_buffer_hook; 5074 extern Lisp_Object Qmono_pixmap_image_instance_p, Qmouse_leave_buffer_hook;
5064 extern Lisp_Object Qnative_layout, Qnatnump, Qnetwork_error, Qno_catch; 5075 extern Lisp_Object Qnative_layout, Qnatnump, Qnetwork_error, Qno_catch;
5065 extern Lisp_Object Qnothing_image_instance_p, Qnumber_char_or_marker_p; 5076 extern Lisp_Object Qnonnegativep, Qnothing_image_instance_p;
5066 extern Lisp_Object Qnumberp, Qout_of_memory; 5077 extern Lisp_Object Qnumber_char_or_marker_p, Qnumberp, Qout_of_memory;
5067 extern Lisp_Object Qoverflow_error, Qpoint, Qpointer_glyph_p; 5078 extern Lisp_Object Qoverflow_error, Qpoint, Qpointer_glyph_p;
5068 extern Lisp_Object Qpointer_image_instance_p, Qprint_length; 5079 extern Lisp_Object Qpointer_image_instance_p, Qprint_length;
5069 extern Lisp_Object Qprint_string_length, Qprinting_unreadable_object; 5080 extern Lisp_Object Qprint_string_length, Qprinting_unreadable_object;
5070 extern Lisp_Object Qprogn, Qquit, Qquote, Qrange_error; 5081 extern Lisp_Object Qprogn, Qquit, Qquote, Qrange_error;
5071 extern Lisp_Object Qread_char, Qread_from_minibuffer; 5082 extern Lisp_Object Qread_char, Qread_from_minibuffer;