Import Upstream version 1.8.5
[hcoop/debian/openafs.git] / src / afs / AIX / osi_assem64.s
1 # Copyright 2000, International Business Machines Corporation and others.
2 # All Rights Reserved.
3 #
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
7
8 # $Locker$
9 #
10 # misc.s - miscellaneous assembler routines for the rs/6000
11 #
12
13 #
14 # get_toc - return the current TOC
15 #
16 .csect .get_toc[PR]
17 .globl .get_toc[PR]
18 mr 3,2 # get TOC
19 br
20 .align 2
21 .tbtag 0x0,0xc,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0
22
23 .toc
24 .csect get_toc[DS]
25 .globl get_toc[DS]
26 .llong .get_toc[PR]
27 .llong TOC[t0]
28
29 #
30 # get_ret_addr - return the caller's return address
31 #
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
36 br
37 .align 2
38 .tbtag 0x0,0xc,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0
39 .toc
40 .csect get_ret_addr[DS]
41 .globl get_ret_addr[DS]
42 .llong .get_ret_addr[PR]
43 .llong TOC[t0]