Changeset 15370 for trunk/source/lisp-kernel/arm-exceptions.c
- Timestamp:
- May 21, 2012, 7:22:51 AM (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/source/lisp-kernel/arm-exceptions.c
r15158 r15370 509 509 if (selector & GC_TRAP_FUNCTION_PURIFY) { 510 510 purify_from_xp(xp, 0L); 511 lisp_global(OLDSPACE_DNODE_COUNT) = area_dnode(managed_static_area->active, managed_static_area->low);511 lisp_global(OLDSPACE_DNODE_COUNT) = 0; 512 512 gc_from_xp(xp, 0L); 513 513 }
Note: See TracChangeset
for help on using the changeset viewer.