Changeset 6406 for branches/x8664-call


Ignore:
Timestamp:
May 4, 2007, 3:32:56 AM (13 years ago)
Author:
gb
Message:

Define a .SPnmkunwind for PPC; needs to be bootstrapped.

Location:
branches/x8664-call/ccl/lisp-kernel
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • branches/x8664-call/ccl/lisp-kernel/ppc-spentry.s

    r5784 r6406  
    68366836       
    68376837
    6838 _spentry(unused_5)
    6839          __(b _SPbreakpoint)
     6838_spentry(nmkunwind)
     6839        __(li imm2,-fixnumone)
     6840        __(li imm3,INTERRUPT_LEVEL_BINDING_INDEX)
     6841        __(ldr(imm4,tcr.tlb_pointer(rcontext)))
     6842        __(ldr(arg_y,INTERRUPT_LEVEL_BINDING_INDEX(imm4)))
     6843        __(ldr(imm1,tcr.db_link(rcontext)))
     6844        __(vpush(arg_y))
     6845        __(vpush(imm3))
     6846        __(vpush(imm1))
     6847        __(str(imm2,INTERRUPT_LEVEL_BINDING_INDEX(imm4)))
     6848        __(str(vsp,tcr.db_link(rcontext)))
     6849        __(lwi(arg_z,unbound_marker))
     6850        __(li imm2,fixnum_one)
     6851        __(mkcatch())
     6852        __(mr arg_z,arg_y)
     6853        __(b _SPbind_interrupt_level)
    68406854
    68416855_spentry(unused_6)
  • branches/x8664-call/ccl/lisp-kernel/ppc-spjump.s

    r6241 r6406  
    174174        _spjump(aset3)
    175175        _spjump(poweropen_ffcall_return_registers)
    176         _spjump(unused_5)
     176        _spjump(nmkunwind)
    177177        _spjump(unused_6)
    178178        _spjump(unbind_interrupt_level)
Note: See TracChangeset for help on using the changeset viewer.