call.py (7872:b21a94bf6a28) call.py (9700:2ea56473f400)
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

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

35#
36# Authors: Gabe Black
37
38microcode = '''
39def macroop CALL_NEAR_I
40{
41 # Make the default data size of calls 64 bits in 64 bit mode
42 .adjust_env oszIn64Override
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

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

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