@@ -836,9 +836,8 @@ def i_CALL(ins,fmap):
836
836
_ea = composer ([cst (0 ,6 ),FCXO ,cst (0 ,6 ),FCXS ])
837
837
new_fcx = fmap (mem (_ea ,32 ))
838
838
disp = 0
839
- for r in (PCXI ,PSW ,A [10 ],A [11 ],D [8 ],D [9 ],D [10 ],D [11 ],A [12 ],A [13 ],A [14 ],
840
- A [15 ],D [12 ],D [13 ],D [14 ],D [15 ]):
841
- fmap [mem (_ea ,32 ,disp = disp )] = r
839
+ for r in env .Upper_Context :
840
+ fmap [mem (_ea ,32 ,disp = disp )] = fmap (r )
842
841
disp += 4
843
842
fmap [PCPN ] = fmap (CCPN )
844
843
fmap [PIE ] = fmap (IE )
@@ -857,8 +856,7 @@ def i_RET(ins,fmap):
857
856
new_pcxi = fmap (mem (_ea ,32 ))
858
857
new_psw = fmap (mem (_ea ,32 ,disp = 4 ))
859
858
disp = 8
860
- for r in (A [10 ],A [11 ],D [8 ],D [9 ],D [10 ],D [11 ],A [12 ],A [13 ],A [14 ],
861
- A [15 ],D [12 ],D [13 ],D [14 ],D [15 ]):
859
+ for r in env .Upper_Context [2 :]:
862
860
fmap [r ] = fmap (mem (_ea ,32 ,disp = disp ))
863
861
disp += 4
864
862
fmap [mem (_ea ,32 )] = fmap (FCX )
@@ -874,8 +872,7 @@ def i_RFE(ins,fmap):
874
872
new_pcxi = fmap (mem (_ea ,32 ))
875
873
new_psw = fmap (mem (_ea ,32 ,disp = 4 ))
876
874
disp = 8
877
- for r in (A [10 ],A [11 ],D [8 ],D [9 ],D [10 ],D [11 ],A [12 ],A [13 ],A [14 ],
878
- A [15 ],D [12 ],D [13 ],D [14 ],D [15 ]):
875
+ for r in env .Upper_Context [2 :]:
879
876
fmap [r ] = fmap (mem (_ea ,32 ,disp = disp ))
880
877
disp += 4
881
878
fmap [mem (_ea ,32 )] = fmap (FCX )
@@ -891,8 +888,7 @@ def i_CALLI(ins,fmap):
891
888
_ea = composer ([cst (0 ,6 ),FCXO ,cst (0 ,6 ),FCXS ])
892
889
new_fcx = fmap (mem (_ea ,32 ))
893
890
disp = 0
894
- for r in (PCXI ,PSW ,A [10 ],A [11 ],D [8 ],D [9 ],D [10 ],D [11 ],A [12 ],A [13 ],A [14 ],
895
- A [15 ],D [12 ],D [13 ],D [14 ],D [15 ]):
891
+ for r in env .Upper_Context :
896
892
fmap [mem (_ea ,32 ,disp = disp )] = r
897
893
disp += 4
898
894
fmap [PCPN ] = fmap (CCPN )
@@ -1003,9 +999,8 @@ def i_BISR(ins,fmap):
1003
999
_ea = composer ([cst (0 ,6 ),FCXO ,cst (0 ,6 ),FCXS ])
1004
1000
new_fcx = fmap (mem (_ea ,32 ))
1005
1001
disp = 0
1006
- for r in (PCXI ,ra ,A [2 ],A [3 ],D [0 ],D [1 ],D [2 ],D [3 ],A [4 ],A [5 ],A [6 ],
1007
- A [7 ],D [4 ],D [5 ],D [6 ],D [7 ]):
1008
- fmap [mem (_ea ,32 ,disp = disp )] = r
1002
+ for r in env .Lower_Context :
1003
+ fmap [mem (_ea ,32 ,disp = disp )] = fmap (r )
1009
1004
disp += 4
1010
1005
fmap [PCPN ] = fmap (CCPN )
1011
1006
fmap [PIE ] = fmap (IE )
0 commit comments