Import Upstream version 1.8.5
[hcoop/debian/openafs.git] / src / afs / AIX / osi_assem.s
CommitLineData
805e021f
CE
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 .long .get_toc[PR]
27 .long 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 .long .get_ret_addr[PR]
43 .long TOC[t0]