Mercurial > hg > xemacs-beta
comparison src/specifier.c @ 2551:9f70af3ac939
[xemacs-hg @ 2005-02-03 16:14:02 by james]
Commit Olivier Galibert's dumper updates for bignums and use them.
See xemacs-patches message with ID <ps8y685c6p.fsf@diannao.ittc.ku.edu>.
author | james |
---|---|
date | Thu, 03 Feb 2005 16:14:08 +0000 |
parents | de9952d2ed18 |
children | 6fa9919a9a0b |
comparison
equal
deleted
inserted
replaced
2550:317f30471f4e | 2551:9f70af3ac939 |
---|---|
64 static specifier_type_entry_dynarr *the_specifier_type_entry_dynarr; | 64 static specifier_type_entry_dynarr *the_specifier_type_entry_dynarr; |
65 | 65 |
66 static const struct memory_description ste_description_1[] = { | 66 static const struct memory_description ste_description_1[] = { |
67 { XD_LISP_OBJECT, offsetof (specifier_type_entry, symbol) }, | 67 { XD_LISP_OBJECT, offsetof (specifier_type_entry, symbol) }, |
68 { XD_BLOCK_PTR, offsetof (specifier_type_entry, meths), 1, | 68 { XD_BLOCK_PTR, offsetof (specifier_type_entry, meths), 1, |
69 &specifier_methods_description }, | 69 { &specifier_methods_description } }, |
70 { XD_END } | 70 { XD_END } |
71 }; | 71 }; |
72 | 72 |
73 static const struct sized_memory_description ste_description = { | 73 static const struct sized_memory_description ste_description = { |
74 sizeof (specifier_type_entry), | 74 sizeof (specifier_type_entry), |
395 { -1 }, | 395 { -1 }, |
396 }; | 396 }; |
397 | 397 |
398 const struct memory_description specifier_description[] = { | 398 const struct memory_description specifier_description[] = { |
399 { XD_BLOCK_PTR, offsetof (Lisp_Specifier, methods), 1, | 399 { XD_BLOCK_PTR, offsetof (Lisp_Specifier, methods), 1, |
400 &specifier_methods_description }, | 400 { &specifier_methods_description } }, |
401 { XD_LO_LINK, offsetof (Lisp_Specifier, next_specifier) }, | 401 { XD_LO_LINK, offsetof (Lisp_Specifier, next_specifier) }, |
402 { XD_LISP_OBJECT, offsetof (Lisp_Specifier, global_specs) }, | 402 { XD_LISP_OBJECT, offsetof (Lisp_Specifier, global_specs) }, |
403 { XD_LISP_OBJECT, offsetof (Lisp_Specifier, device_specs) }, | 403 { XD_LISP_OBJECT, offsetof (Lisp_Specifier, device_specs) }, |
404 { XD_LISP_OBJECT, offsetof (Lisp_Specifier, frame_specs) }, | 404 { XD_LISP_OBJECT, offsetof (Lisp_Specifier, frame_specs) }, |
405 { XD_LISP_OBJECT, offsetof (Lisp_Specifier, window_specs) }, | 405 { XD_LISP_OBJECT, offsetof (Lisp_Specifier, window_specs) }, |
406 { XD_LISP_OBJECT, offsetof (Lisp_Specifier, buffer_specs) }, | 406 { XD_LISP_OBJECT, offsetof (Lisp_Specifier, buffer_specs) }, |
407 { XD_BLOCK_PTR, offsetof (Lisp_Specifier, caching), 1, | 407 { XD_BLOCK_PTR, offsetof (Lisp_Specifier, caching), 1, |
408 &specifier_caching_description }, | 408 { &specifier_caching_description } }, |
409 { XD_LISP_OBJECT, offsetof (Lisp_Specifier, magic_parent) }, | 409 { XD_LISP_OBJECT, offsetof (Lisp_Specifier, magic_parent) }, |
410 { XD_LISP_OBJECT, offsetof (Lisp_Specifier, fallback) }, | 410 { XD_LISP_OBJECT, offsetof (Lisp_Specifier, fallback) }, |
411 { XD_BLOCK_ARRAY, offsetof (Lisp_Specifier, data), 1, | 411 { XD_BLOCK_ARRAY, offsetof (Lisp_Specifier, data), 1, |
412 specifier_extra_description_map }, | 412 { specifier_extra_description_map } }, |
413 { XD_END } | 413 { XD_END } |
414 }; | 414 }; |
415 | 415 |
416 static const struct memory_description specifier_empty_extra_description_1[] = | 416 static const struct memory_description specifier_empty_extra_description_1[] = |
417 { | 417 { |