mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-26 15:21:51 -08:00
c0bb4cd3cd
This change will be integrated but ignored (-ay) to the gg-epcore/union sources, so that they retain HopeNames. Copied from Perforce Change: 24911 ServerID: perforce.ravenbrook.com
43 lines
1.3 KiB
ArmAsm
43 lines
1.3 KiB
ArmAsm
! impl.s.sssus8
|
|
!
|
|
! STACK SCANNING
|
|
!
|
|
! $Id$
|
|
!
|
|
! Copyright (c) 2001 Ravenbrook Limited.
|
|
!
|
|
! This scans the stack and the preserved integer registers.
|
|
! See design.mps.thread-manager
|
|
!
|
|
! This file is identical to impl.s.sssos8, except for the
|
|
! leading underscore convention on C names. They should be
|
|
! changed in parallel.
|
|
!
|
|
! The non-global registers are preserved into the stackframe
|
|
! by the "ta 3" instruction. This leaves the global registers.
|
|
! According to the Sparc Architecture Manual:
|
|
! %g1 is assumed to be volatile across procedure calls
|
|
! %g2...%g4 are "reserved for use by application programmer"
|
|
! %g5...%g7 are "nonvolatile and reserved for (as-yet-undefined)
|
|
! use by the execution environment"
|
|
! To be safe %g2 to %g7 are pushed onto the stack before scanning
|
|
! it just in case.
|
|
|
|
.text
|
|
.align 4
|
|
.global _StackScan
|
|
_StackScan: !(ss, stackBot)
|
|
save %sp,-120,%sp !23 required + 6 globals = 29 words, 8-aligned
|
|
|
|
std %g6,[%fp-8] !double stores
|
|
std %g4,[%fp-16]
|
|
std %g2,[%fp-24]
|
|
ta 3 !flushes register windows onto stack
|
|
|
|
mov %i0,%o0 !ss
|
|
sub %fp,24,%o1 !stackTop (base)
|
|
call _TraceScanArea !(stackTop,stackBot,trace,rank) returns e
|
|
mov %i1,%o2 !ds!stackBot (limit)
|
|
|
|
ret
|
|
restore %g0,%o0,%o0 !ds!return e
|