1*53f566e0SPedro Giffuni !/**************************************************************
2*53f566e0SPedro Giffuni ! *
3*53f566e0SPedro Giffuni ! * Licensed to the Apache Software Foundation (ASF) under one
4*53f566e0SPedro Giffuni ! * or more contributor license agreements.  See the NOTICE file
5*53f566e0SPedro Giffuni ! * distributed with this work for additional information
6*53f566e0SPedro Giffuni ! * regarding copyright ownership.  The ASF licenses this file
7*53f566e0SPedro Giffuni ! * to you under the Apache License, Version 2.0 (the
8*53f566e0SPedro Giffuni ! * "License"); you may not use this file except in compliance
9*53f566e0SPedro Giffuni ! * with the License.  You may obtain a copy of the License at
10*53f566e0SPedro Giffuni ! *
11*53f566e0SPedro Giffuni ! *   http://www.apache.org/licenses/LICENSE-2.0
12*53f566e0SPedro Giffuni ! *
13*53f566e0SPedro Giffuni ! * Unless required by applicable law or agreed to in writing,
14*53f566e0SPedro Giffuni ! * software distributed under the License is distributed on an
15*53f566e0SPedro Giffuni ! * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16*53f566e0SPedro Giffuni ! * KIND, either express or implied.  See the License for the
17*53f566e0SPedro Giffuni ! * specific language governing permissions and limitations
18*53f566e0SPedro Giffuni ! * under the License.
19*53f566e0SPedro Giffuni ! *
20*53f566e0SPedro Giffuni ! *************************************************************/
21b5da552cSAndrew Rist 
22b5da552cSAndrew Rist 
23cdf0e10cSrcweir 
24cdf0e10cSrcweir .global callVirtualMethod
25cdf0e10cSrcweir .align 8
26cdf0e10cSrcweir callVirtualMethod:
27cdf0e10cSrcweir     ! %o0: unsigned long function
28cdf0e10cSrcweir     ! %o1: unsigned long * stack
29cdf0e10cSrcweir     ! %o2: sal_Int32 excess
30cdf0e10cSrcweir     add %o2, 176, %o3
31cdf0e10cSrcweir     neg %o3
32cdf0e10cSrcweir     save %sp, %o3, %sp
33cdf0e10cSrcweir     ldx [%i1 + 0 * 8], %o0
34cdf0e10cSrcweir     ldx [%i1 + 1 * 8], %o1
35cdf0e10cSrcweir     ldx [%i1 + 2 * 8], %o2
36cdf0e10cSrcweir     ldx [%i1 + 3 * 8], %o3
37cdf0e10cSrcweir     tst %i2
38cdf0e10cSrcweir     bz,pt %xcc, 1f
39cdf0e10cSrcweir     ldx [%i1 + 4 * 8], %o4
40cdf0e10cSrcweir     add %i1, 6 * 8, %l0
41cdf0e10cSrcweir     add %sp, 2047 + 176, %l1
42cdf0e10cSrcweir 0:  deccc 8, %i2
43cdf0e10cSrcweir     ldx [%l0 + %i2], %l2
44cdf0e10cSrcweir     bnz,pt %xcc, 0b
45cdf0e10cSrcweir     stx %l2, [%l1 + %i2]
46cdf0e10cSrcweir 1:  call %i0
47cdf0e10cSrcweir     ldx [%i1 + 5 * 8], %o5
48cdf0e10cSrcweir     stx %o0, [%i1 + 0 * 8]
49cdf0e10cSrcweir     stx %o1, [%i1 + 1 * 8]
50cdf0e10cSrcweir     stx %o2, [%i1 + 2 * 8]
51cdf0e10cSrcweir     stx %o3, [%i1 + 3 * 8]
52cdf0e10cSrcweir     ret
53cdf0e10cSrcweir     restore
54cdf0e10cSrcweir .size callVirtualMethod, . - callVirtualMethod
55cdf0e10cSrcweir .type callVirtualMethod, #function
56