bridges/source/cpp_uno/cc5_solaris_sparc64/callvirtualmethod.s

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: callvirtualmethod.s,v $
  10  *
  11  * $Revision: 1.3 $
  12  *
  13  * This file is part of OpenOffice.org.
  14  *
  15  * OpenOffice.org is free software: you can redistribute it and/or modify
  16  * it under the terms of the GNU Lesser General Public License version 3
  17  * only, as published by the Free Software Foundation.
  18  *
  19  * OpenOffice.org is distributed in the hope that it will be useful,
  20  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  22  * GNU Lesser General Public License version 3 for more details
  23  * (a copy is included in the LICENSE file that accompanied this code).
  24  *
  25  * You should have received a copy of the GNU Lesser General Public License
  26  * version 3 along with OpenOffice.org.  If not, see
  27  * <http://www.openoffice.org/license.html>
  28  * for a copy of the LGPLv3 License.
  29  *
  30  ************************************************************************/
  31
  32 .global callVirtualMethod
  33 .align 8
  34 callVirtualMethod:
  35     ! %o0: unsigned long function
  36     ! %o1: unsigned long * stack
  37     ! %o2: sal_Int32 excess
  38     add %o2, 176, %o3
  39     neg %o3
  40     save %sp, %o3, %sp
  41     ldx [%i1 + 0 * 8], %o0
  42     ldx [%i1 + 1 * 8], %o1
  43     ldx [%i1 + 2 * 8], %o2
  44     ldx [%i1 + 3 * 8], %o3
  45     tst %i2
  46     bz,pt %xcc, 1f
  47     ldx [%i1 + 4 * 8], %o4
  48     add %i1, 6 * 8, %l0
  49     add %sp, 2047 + 176, %l1
  50 0:  deccc 8, %i2
  51     ldx [%l0 + %i2], %l2
  52     bnz,pt %xcc, 0b
  53     stx %l2, [%l1 + %i2]
  54 1:  call %i0
  55     ldx [%i1 + 5 * 8], %o5
  56     stx %o0, [%i1 + 0 * 8]
  57     stx %o1, [%i1 + 1 * 8]
  58     stx %o2, [%i1 + 2 * 8]
  59     stx %o3, [%i1 + 3 * 8]
  60     ret
  61     restore
  62 .size callVirtualMethod, . - callVirtualMethod
  63 .type callVirtualMethod, #function