Changeset 8617


Ignore:
Timestamp:
Feb 29, 2008, 4:05:08 AM (12 years ago)
Author:
gb
Message:

Set HEAP_START and HEAP_END earlier.

Location:
branches/1.1/ccl/lisp-kernel
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • branches/1.1/ccl/lisp-kernel/image.c

    r6215 r8617  
    313313        break;
    314314      case AREA_DYNAMIC:
    315         lisp_global(HEAP_START) = ptr_to_lispobj(a->low);
    316         lisp_global(HEAP_END) = ptr_to_lispobj(a->high);
    317315        if (bias) {
    318316          relocate_area_contents(a, bias);
  • branches/1.1/ccl/lisp-kernel/pmcl-kernel.c

    r8228 r8617  
    762762  a->softprot = NULL;
    763763  a->hardprot = NULL;
     764  lisp_global(HEAP_START) = ptr_to_lispobj(a->low);
     765  lisp_global(HEAP_END) = ptr_to_lispobj(a->high);
    764766  ensure_gc_structures_writable();
    765767  return a;
Note: See TracChangeset for help on using the changeset viewer.