src/afs/AIX/osi_assem.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         .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]