diff options
| author | Karl Heuer | 1995-01-11 02:13:20 +0000 |
|---|---|---|
| committer | Karl Heuer | 1995-01-11 02:13:20 +0000 |
| commit | c98adc1b2ee0d0e144efd1049a49f57c053d499b (patch) | |
| tree | 45cf5349a15198b305bd18408a05287f2b1e2746 /src | |
| parent | 691c4285c562c1a7aec980b780cbdfe4b608a6a0 (diff) | |
| download | emacs-c98adc1b2ee0d0e144efd1049a49f57c053d499b.tar.gz emacs-c98adc1b2ee0d0e144efd1049a49f57c053d499b.zip | |
Use large constants for Lisp_Misc_Type.
Add some function declarations.
Diffstat (limited to 'src')
| -rw-r--r-- | src/lisp.h | 34 |
1 files changed, 32 insertions, 2 deletions
diff --git a/src/lisp.h b/src/lisp.h index ed8aab5d4ab..f83faf8082f 100644 --- a/src/lisp.h +++ b/src/lisp.h | |||
| @@ -64,10 +64,13 @@ enum Lisp_Type | |||
| 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, |
| @@ -1324,6 +1327,33 @@ 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 (); |
| 1326 | 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 (); | ||
| 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 (); |