1
# ***** BEGIN LICENSE BLOCK *****
3
# Version: MPL 1.1/LGPL 2.1/GPL 2.0
5
# The contents of this file are subject to the Mozilla Public
6
# License Version 1.1 (the "License"); you may not use this file
7
# except in compliance with the License. You may obtain a copy of
8
# the License at http://www.mozilla.org/MPL/
10
# Software distributed under the License is distributed on an "AS
11
# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
12
# implied. See the License for the specific language governing
13
# rights and limitations under the License.
15
# The Original Code is mozilla.org code.
17
# The Initial Developer of the Original Code is IBM Corporation.
18
# Portions created by IBM are
19
# Copyright (C) 2002, International Business Machines Corporation.
20
# All Rights Reserved.
24
# Alternatively, the contents of this file may be used under the terms of
25
# either of the GNU General Public License Version 2 or later (the "GPL"),
26
# or the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
27
# in which case the provisions of the GPL or the LGPL are applicable instead
28
# of those above. If you wish to allow use of your version of this file only
29
# under the terms of either the GPL or the LGPL, and not to allow others to
30
# use your version of this file under the terms of the MPL, indicate your
31
# decision by deleting the provisions above and replace them with the notice
32
# and other provisions required by the LGPL or the GPL. If you do not delete
33
# the provisions above, a recipient may use your version of this file under
34
# the terms of any one of the MPL, the GPL or the LGPL.
36
# ***** END LICENSE BLOCK *****
38
.set r0,0; .set sp,1; .set RTOC,2; .set r3,3; .set r4,4
39
.set r5,5; .set r6,6; .set r7,7; .set r8,8; .set r9,9
40
.set r10,10; .set r11,11; .set r12,12; .set r13,13; .set r14,14
41
.set r15,15; .set r16,16; .set r17,17; .set r18,18; .set r19,19
42
.set r20,20; .set r21,21; .set r22,22; .set r23,23; .set r24,24
43
.set r25,25; .set r26,26; .set r27,27; .set r28,28; .set r29,29
44
.set r30,30; .set r31,31
45
.set f0,0; .set f1,1; .set f2,2; .set f3,3; .set f4,4
46
.set f5,5; .set f6,6; .set f7,7; .set f8,8; .set f9,9
47
.set f10,10; .set f11,11; .set f12,12; .set f13,13; .set f14,14
48
.set f15,15; .set f16,16; .set f17,17; .set f18,18; .set f19,19
49
.set f20,20; .set f21,21; .set f22,22; .set f23,23; .set f24,24
50
.set f25,25; .set f26,26; .set f27,27; .set f28,28; .set f29,29
51
.set f30,30; .set f31,31
54
.rename H.10.NO_SYMBOL{PR},""
55
.rename H.18.SharedStub{TC},"SharedStub"
60
.csect H.10.NO_SYMBOL{PR}
63
.extern .PrepareAndDispatch
68
# on entry SharedStub has the method selector in r12, the rest of the original
69
# parameters are in r3 thru r10 and f1 thru f13
71
#jimbo import .PrepareAndDispatch
77
mr r12,r3 # Move methodIndex into r12 for LATER
78
ld r3,176(sp) # Get the 'original' r3 (load 'this' into r3)
80
stdu sp,-248(sp) # room for linkage (24*2), fprData (104),
81
# gprData(28*2), outgoing params to
82
# PrepareAndDispatch (40)
84
std r4,88(sp) # link area (48) + PrepareAndDispatch parms (40)
105
addi r6,sp,88 # gprData
106
addi r7,sp,144 # fprData
107
# r3 has the 'self' pointer already
108
mr r4,r12 # methodIndex selector (it is now LATER)
109
addi r5,sp,488 # pointer to callers args area, beyond r3-r10
111
# 32bit: 176 (stack-distance) 64bit: 248 (stack-distance)
112
# 104 (this ptr offset) 176
113
# 32 (8*4 for r3-r10) 64 (8*8)
117
bl .PrepareAndDispatch
120
ld r0,264(sp) # 248+16
129
.tc H.18.SharedStub{TC},SharedStub{DS}
131
.csect SharedStub{DS}
132
.llong .SharedStub # "\0\0\0\0"
133
.llong TOC{TC0} # "\0\0\0008"
134
.llong 0x00000000 # "\0\0\0\0"
135
# End csect SharedStub{DS}