Mercurial > hg > xemacs-beta

comparison src/specifier.c @ 452:3d3049ae1304 r21-2-41

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-41
author cvs
date Mon, 13 Aug 2007 11:40:21 +0200
parents 576fb035e263
children e7ef97881643
comparison
equal deleted inserted replaced
451:8ad70c5cd5d7 452:3d3049ae1304
3265 3265
3266 void 3266 void
3267 specifier_type_create (void) 3267 specifier_type_create (void)
3268 { 3268 {
3269 the_specifier_type_entry_dynarr = Dynarr_new (specifier_type_entry); 3269 the_specifier_type_entry_dynarr = Dynarr_new (specifier_type_entry);
3270 dumpstruct (&the_specifier_type_entry_dynarr, &sted_description); 3270 dump_add_root_struct_ptr (&the_specifier_type_entry_dynarr, &sted_description);
3271 3271
3272 Vspecifier_type_list = Qnil; 3272 Vspecifier_type_list = Qnil;
3273 staticpro (&Vspecifier_type_list); 3273 staticpro (&Vspecifier_type_list);
3274 3274
3275 INITIALIZE_SPECIFIER_TYPE (generic, "generic", "generic-specifier-p"); 3275 INITIALIZE_SPECIFIER_TYPE (generic, "generic", "generic-specifier-p");
3309 staticpro (&Vcached_specifiers); 3309 staticpro (&Vcached_specifiers);
3310 3310
3311 /* Do NOT mark through this, or specifiers will never be GC'd. 3311 /* Do NOT mark through this, or specifiers will never be GC'd.
3312 This is the same deal as for weak hash tables. */ 3312 This is the same deal as for weak hash tables. */
3313 Vall_specifiers = Qnil; 3313 Vall_specifiers = Qnil;
3314 pdump_wire_list (&Vall_specifiers); 3314 dump_add_weak_object_chain (&Vall_specifiers);
3315 3315
3316 Vuser_defined_tags = Qnil; 3316 Vuser_defined_tags = Qnil;
3317 staticpro (&Vuser_defined_tags); 3317 staticpro (&Vuser_defined_tags);
3318 3318
3319 Vunlock_ghost_specifiers = Qnil; 3319 Vunlock_ghost_specifiers = Qnil;