Mercurial > emacs

comparison src/lisp.h @ 10396:47938020b39d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use large constants for Lisp_Misc_Type. Add some function declarations.
author Karl Heuer <kwzh@gnu.org>
date Wed, 11 Jan 1995 02:13:20 +0000
parents 40988c371fca
children 49d0af7283d6
comparison
equal deleted inserted replaced
10395:c121703d35c7 10396:47938020b39d
62 /* This is not a type code. It is for range checking. */ 62 /* This is not a type code. It is for range checking. */
63 Lisp_Type_Limit 63 Lisp_Type_Limit
64 }; 64 };
65 65
66 /* This is the set of datatypes that share a common structure. 66 /* This is the set of datatypes that share a common structure.
67 The first member of the structure is a type code from this set. */ 67 The first member of the structure is a type code from this set.
68 The enum values are arbitrary, but we'll use large numbers to make it
69 more likely that we'll spot the error if a random word in memory is
70 mistakenly interpreted as a Lisp_Misc. */
68 enum Lisp_Misc_Type 71 enum Lisp_Misc_Type
69 { 72 {
70 Lisp_Misc_Free, 73 Lisp_Misc_Free = 0x5eab,
71 Lisp_Misc_Marker, 74 Lisp_Misc_Marker,
72 Lisp_Misc_Intfwd, 75 Lisp_Misc_Intfwd,
73 Lisp_Misc_Boolfwd, 76 Lisp_Misc_Boolfwd,
74 Lisp_Misc_Objfwd, 77 Lisp_Misc_Objfwd,
75 Lisp_Misc_Buffer_Objfwd, 78 Lisp_Misc_Buffer_Objfwd,
1321 extern Lisp_Object Fy_or_n_p (), do_yes_or_no_p (); 1324 extern Lisp_Object Fy_or_n_p (), do_yes_or_no_p ();
1322 extern Lisp_Object Ffeaturep (), Frequire () , Fprovide (); 1325 extern Lisp_Object Ffeaturep (), Frequire () , Fprovide ();
1323 extern Lisp_Object concat2 (), nconc2 (); 1326 extern Lisp_Object concat2 (), nconc2 ();
1324 extern Lisp_Object assq_no_quit (); 1327 extern Lisp_Object assq_no_quit ();
1325 extern Lisp_Object Fcopy_alist (); 1328 extern Lisp_Object Fcopy_alist ();
1329
1330 /* Defined in insdel.c */
1331 extern void move_gap ();
1332 extern void make_gap ();
1333 extern void insert ();
1334 extern void insert_and_inherit ();
1335 extern void insert_1 ();
1336 extern void insert_from_string ();
1337 extern void insert_from_buffer ();
1338 extern void insert_char ();
1339 extern void insert_string ();
1340 extern void insert_before_markers ();
1341 extern void insert_before_markers_and_inherit ();
1342 extern void insert_from_string_before_markers ();
1343 extern void del_range ();
1344 extern void del_range_1 ();
1345 extern void modify_region ();
1346 extern void prepare_to_modify_buffer ();
1347 extern void signal_before_change ();
1348 extern void signal_after_change ();
1349
1350 /* Defined in xdisp.c */
1351 extern void message ();
1352 extern void message1 ();
1353 extern void message1_nolog ();
1354 extern void message2 ();
1355 extern void message2_nolog ();
1326 1356
1327 /* Defined in alloc.c */ 1357 /* Defined in alloc.c */
1328 extern Lisp_Object Vpurify_flag; 1358 extern Lisp_Object Vpurify_flag;
1329 extern Lisp_Object Fcons (), Flist(), Fmake_list (), allocate_misc (); 1359 extern Lisp_Object Fcons (), Flist(), Fmake_list (), allocate_misc ();
1330 extern Lisp_Object Fmake_vector (), Fvector (), Fmake_symbol (), Fmake_marker (); 1360 extern Lisp_Object Fmake_vector (), Fvector (), Fmake_symbol (), Fmake_marker ();