1 # Copyright 2000, International Business Machines Corporation and others.
4 # This software has been released under the terms of the IBM Public
5 # License. For details, see the LICENSE file in the top-level source
6 # directory or online at http://www.openafs.org/dl/license10.html
10 # misc.s - miscellaneous assembler routines for the rs/6000
14 # get_toc - return the current TOC
21 .tbtag 0x0,0xc,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0
30 # get_ret_addr - return the caller's return address
32 .csect .get_ret_addr[PR]
33 .globl .get_ret_addr[PR]
34 l 3, 0(1) # caller's saved stack pointer
35 l 3, 8(3) # caller's saved link register
38 .tbtag 0x0,0xc,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0
40 .csect get_ret_addr[DS]
41 .globl get_ret_addr[DS]
42 .long .get_ret_addr[PR]