Mercurial > hg > xemacs-beta

comparison src/file-coding.c @ 2551:9f70af3ac939

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[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 7de8d9ab7bbd
children 6fa9919a9a0b
comparison
equal deleted inserted replaced
2550:317f30471f4e 2551:9f70af3ac939
104 } coding_system_type_entry_dynarr; 104 } coding_system_type_entry_dynarr;
105 105
106 static coding_system_type_entry_dynarr *the_coding_system_type_entry_dynarr; 106 static coding_system_type_entry_dynarr *the_coding_system_type_entry_dynarr;
107 107
108 static const struct memory_description cste_description_1[] = { 108 static const struct memory_description cste_description_1[] = {
109 { XD_BLOCK_PTR, offsetof (coding_system_type_entry, meths), 1, &coding_system_methods_description }, 109 { XD_BLOCK_PTR, offsetof (coding_system_type_entry, meths), 1,
110 { &coding_system_methods_description } },
110 { XD_END } 111 { XD_END }
111 }; 112 };
112 113
113 static const struct sized_memory_description cste_description = { 114 static const struct sized_memory_description cste_description = {
114 sizeof (coding_system_type_entry), 115 sizeof (coding_system_type_entry),
169 170
170 static const struct memory_description struct_detector_description_1[] 171 static const struct memory_description struct_detector_description_1[]
171 = 172 =
172 { 173 {
173 { XD_BLOCK_PTR, offsetof (struct detector, cats), 1, 174 { XD_BLOCK_PTR, offsetof (struct detector, cats), 1,
174 &detector_category_dynarr_description }, 175 { &detector_category_dynarr_description } },
175 { XD_END } 176 { XD_END }
176 }; 177 };
177 178
178 static const struct sized_memory_description struct_detector_description = 179 static const struct sized_memory_description struct_detector_description =
179 { 180 {
344 }; 345 };
345 346
346 static const struct memory_description coding_system_description[] = 347 static const struct memory_description coding_system_description[] =
347 { 348 {
348 { XD_BLOCK_PTR, offsetof (Lisp_Coding_System, methods), 1, 349 { XD_BLOCK_PTR, offsetof (Lisp_Coding_System, methods), 1,
349 &coding_system_methods_description }, 350 { &coding_system_methods_description } },
350 #define MARKED_SLOT(x) { XD_LISP_OBJECT, offsetof (Lisp_Coding_System, x) }, 351 #define MARKED_SLOT(x) { XD_LISP_OBJECT, offsetof (Lisp_Coding_System, x) },
351 #define MARKED_SLOT_ARRAY(slot, size) \ 352 #define MARKED_SLOT_ARRAY(slot, size) \
352 { XD_LISP_OBJECT_ARRAY, offsetof (Lisp_Coding_System, slot), size }, 353 { XD_LISP_OBJECT_ARRAY, offsetof (Lisp_Coding_System, slot), size },
353 #include "coding-system-slots.h" 354 #include "coding-system-slots.h"
354 { XD_BLOCK_ARRAY, offsetof (Lisp_Coding_System, data), 1, 355 { XD_BLOCK_ARRAY, offsetof (Lisp_Coding_System, data), 1,
355 coding_system_extra_description_map }, 356 { coding_system_extra_description_map } },
356 { XD_END } 357 { XD_END }
357 }; 358 };
358 359
359 static const struct memory_description coding_system_empty_extra_description_1[] = 360 static const struct memory_description coding_system_empty_extra_description_1[] =
360 { 361 {
1725 1726
1726 extern const struct sized_memory_description chain_coding_stream_description; 1727 extern const struct sized_memory_description chain_coding_stream_description;
1727 extern const struct sized_memory_description undecided_coding_stream_description; 1728 extern const struct sized_memory_description undecided_coding_stream_description;
1728 1729
1729 static const struct memory_description coding_stream_data_description_1 []= { 1730 static const struct memory_description coding_stream_data_description_1 []= {
1730 { XD_BLOCK_PTR, chain_coding_system, 1, &chain_coding_stream_description}, 1731 { XD_BLOCK_PTR, chain_coding_system, 1,
1731 { XD_BLOCK_PTR, undecided_coding_system, 1, &undecided_coding_stream_description}, 1732 { &chain_coding_stream_description } },
1733 { XD_BLOCK_PTR, undecided_coding_system, 1,
1734 { &undecided_coding_stream_description } },
1732 { XD_END } 1735 { XD_END }
1733 }; 1736 };
1734 1737
1735 static const struct sized_memory_description coding_stream_data_description = { 1738 static const struct sized_memory_description coding_stream_data_description = {
1736 sizeof (void *), coding_stream_data_description_1 1739 sizeof (void *), coding_stream_data_description_1
1740 { XD_INT, offsetof (struct coding_stream, type) }, 1743 { XD_INT, offsetof (struct coding_stream, type) },
1741 { XD_LISP_OBJECT, offsetof (struct coding_stream, orig_codesys) }, 1744 { XD_LISP_OBJECT, offsetof (struct coding_stream, orig_codesys) },
1742 { XD_LISP_OBJECT, offsetof (struct coding_stream, codesys) }, 1745 { XD_LISP_OBJECT, offsetof (struct coding_stream, codesys) },
1743 { XD_LISP_OBJECT, offsetof (struct coding_stream, other_end) }, 1746 { XD_LISP_OBJECT, offsetof (struct coding_stream, other_end) },
1744 { XD_UNION, offsetof (struct coding_stream, data), 1747 { XD_UNION, offsetof (struct coding_stream, data),
1745 XD_INDIRECT (0, 0), &coding_stream_data_description }, 1748 XD_INDIRECT (0, 0), { &coding_stream_data_description } },
1746 { XD_END } 1749 { XD_END }
1747 }; 1750 };
1748 1751
1749 DEFINE_LSTREAM_IMPLEMENTATION_WITH_DATA ("coding", coding); 1752 DEFINE_LSTREAM_IMPLEMENTATION_WITH_DATA ("coding", coding);
1750 1753
2328 }; 2331 };
2329 2332
2330 static const struct memory_description chain_coding_system_description[] = { 2333 static const struct memory_description chain_coding_system_description[] = {
2331 { XD_INT, offsetof (struct chain_coding_system, count) }, 2334 { XD_INT, offsetof (struct chain_coding_system, count) },
2332 { XD_BLOCK_PTR, offsetof (struct chain_coding_system, chain), 2335 { XD_BLOCK_PTR, offsetof (struct chain_coding_system, chain),
2333 XD_INDIRECT (0, 0), &lisp_object_description }, 2336 XD_INDIRECT (0, 0), { &lisp_object_description } },
2334 { XD_LISP_OBJECT, offsetof (struct chain_coding_system, 2337 { XD_LISP_OBJECT, offsetof (struct chain_coding_system,
2335 canonicalize_after_coding) }, 2338 canonicalize_after_coding) },
2336 { XD_END } 2339 { XD_END }
2337 }; 2340 };
2338 2341
2339 static const struct memory_description chain_coding_stream_description_1 [] = { 2342 static const struct memory_description chain_coding_stream_description_1 [] = {
2340 { XD_INT, offsetof (struct chain_coding_stream, lstream_count) }, 2343 { XD_INT, offsetof (struct chain_coding_stream, lstream_count) },
2341 { XD_BLOCK_PTR, offsetof (struct chain_coding_stream, lstreams), 2344 { XD_BLOCK_PTR, offsetof (struct chain_coding_stream, lstreams),
2342 XD_INDIRECT (0, 0), &lisp_object_description }, 2345 XD_INDIRECT (0, 0), { &lisp_object_description } },
2343 { XD_END } 2346 { XD_END }
2344 }; 2347 };
2345 2348
2346 const struct sized_memory_description chain_coding_stream_description = { 2349 const struct sized_memory_description chain_coding_stream_description = {
2347 sizeof (struct chain_coding_stream), chain_coding_stream_description_1 2350 sizeof (struct chain_coding_stream), chain_coding_stream_description_1
3083 }; 3086 };
3084 3087
3085 static const struct memory_description undecided_coding_stream_description_1 [] = { 3088 static const struct memory_description undecided_coding_stream_description_1 [] = {
3086 { XD_LISP_OBJECT, offsetof (struct undecided_coding_stream, actual) }, 3089 { XD_LISP_OBJECT, offsetof (struct undecided_coding_stream, actual) },
3087 { XD_BLOCK_ARRAY, offsetof (struct undecided_coding_stream, c), 3090 { XD_BLOCK_ARRAY, offsetof (struct undecided_coding_stream, c),
3088 1, &chain_coding_stream_description }, 3091 1, { &chain_coding_stream_description } },
3089 { XD_END } 3092 { XD_END }
3090 }; 3093 };
3091 3094
3092 const struct sized_memory_description undecided_coding_stream_description = { 3095 const struct sized_memory_description undecided_coding_stream_description = {
3093 sizeof (struct undecided_coding_stream), undecided_coding_stream_description_1 3096 sizeof (struct undecided_coding_stream), undecided_coding_stream_description_1