call.py (7087:fb8d5786ff30) call.py (7872:b21a94bf6a28)
1# Copyright (c) 2007 The Hewlett-Packard Development Company
2# All rights reserved.
3#
4# The license below extends only to copyright in the software and shall
5# not be construed as granting a license to any other intellectual
6# property including but not limited to intellectual property relating
7# to a hardware implementation of the functionality of the software
8# licensed hereunder. You may use the software subject to the license

--- 30 unchanged lines hidden (view full) ---

39def macroop CALL_NEAR_I
40{
41 # Make the default data size of calls 64 bits in 64 bit mode
42 .adjust_env oszIn64Override
43
44 limm t1, imm
45 rdip t7
46 # Check target of call
1# Copyright (c) 2007 The Hewlett-Packard Development Company
2# All rights reserved.
3#
4# The license below extends only to copyright in the software and shall
5# not be construed as granting a license to any other intellectual
6# property including but not limited to intellectual property relating
7# to a hardware implementation of the functionality of the software
8# licensed hereunder. You may use the software subject to the license

--- 30 unchanged lines hidden (view full) ---

39def macroop CALL_NEAR_I
40{
41 # Make the default data size of calls 64 bits in 64 bit mode
42 .adjust_env oszIn64Override
43
44 limm t1, imm
45 rdip t7
46 # Check target of call
47 stupd t7, ss, [0, t0, rsp], "-env.dataSize"
47 st t7, ss, [0, t0, rsp], "-env.dataSize"
48 subi rsp, rsp, ssz
48 wrip t7, t1
49};
50
51def macroop CALL_NEAR_R
52{
53 # Make the default data size of calls 64 bits in 64 bit mode
54 .adjust_env oszIn64Override
55
56 rdip t1
57 # Check target of call
49 wrip t7, t1
50};
51
52def macroop CALL_NEAR_R
53{
54 # Make the default data size of calls 64 bits in 64 bit mode
55 .adjust_env oszIn64Override
56
57 rdip t1
58 # Check target of call
58 stupd t1, ss, [0, t0, rsp], "-env.dataSize"
59 st t1, ss, [0, t0, rsp], "-env.dataSize"
60 subi rsp, rsp, ssz
59 wripi reg, 0
60};
61
62def macroop CALL_NEAR_M
63{
64 # Make the default data size of calls 64 bits in 64 bit mode
65 .adjust_env oszIn64Override
66
67 rdip t7
68 ld t1, seg, sib, disp
69 # Check target of call
61 wripi reg, 0
62};
63
64def macroop CALL_NEAR_M
65{
66 # Make the default data size of calls 64 bits in 64 bit mode
67 .adjust_env oszIn64Override
68
69 rdip t7
70 ld t1, seg, sib, disp
71 # Check target of call
70 stupd t7, ss, [0, t0, rsp], "-env.dataSize"
72 st t7, ss, [0, t0, rsp], "-env.dataSize"
73 subi rsp, rsp, ssz
71 wripi t1, 0
72};
73
74def macroop CALL_NEAR_P
75{
76 # Make the default data size of calls 64 bits in 64 bit mode
77 .adjust_env oszIn64Override
78
79 rdip t7
80 ld t1, seg, riprel, disp
81 # Check target of call
74 wripi t1, 0
75};
76
77def macroop CALL_NEAR_P
78{
79 # Make the default data size of calls 64 bits in 64 bit mode
80 .adjust_env oszIn64Override
81
82 rdip t7
83 ld t1, seg, riprel, disp
84 # Check target of call
82 stupd t7, ss, [0, t0, rsp], "-env.dataSize"
85 st t7, ss, [0, t0, rsp], "-env.dataSize"
86 subi rsp, rsp, ssz
83 wripi t1, 0
84};
85'''
86#let {{
87# class CALL(Inst):
88# "GenFault ${new UnimpInstFault}"
89#}};
87 wripi t1, 0
88};
89'''
90#let {{
91# class CALL(Inst):
92# "GenFault ${new UnimpInstFault}"
93#}};