Changeset 8249


Ignore:
Timestamp:
Jan 23, 2008, 8:55:16 AM (12 years ago)
Author:
gb
Message:

Needed a FREEZE for ppc.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-0/PPC/ppc-utils.lisp

    r4003 r8249  
    576576
    577577
    578 
     578(defppclapfunction freeze ()
     579  "Do a full GC, then consider all heap-allocated objects which survive to be non-relocatable."
     580  (check-nargs 0)
     581  (li imm0 arch::gc-trap-function-freeze)
     582  (trlgei allocptr 0)
     583  (ba .SPmakeu64))
    579584 
    580585
Note: See TracChangeset for help on using the changeset viewer.