paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-30 17:40:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

Revert the changes from r23383 for m68k/n68kadd.pas. Memo to self: Don't change code if you don't really understand why it does things the way it does.

Browse Source 
With this change and the change from r23465 we are down from ~950 to ~650 failures :D

git-svn-id: trunk@23466 -
This commit is contained in:
svenbarth 2013-01-20 18:00:51 +00:00
parent b455ae9534
commit 78f0d6f70e
1 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
compiler/m68k/n68kadd.pas
View File

@ -267,10 +267,10 @@ implementation
begin
if nf_swapped in flags then
case nodetype of
ltn : getresflags:=F_GE;
lten : getresflags:=F_G;
gtn : getresflags:=F_LE;
gten : getresflags:=F_L;
ltn : getresflags:=F_G;
lten : getresflags:=F_GE;
gtn : getresflags:=F_L;
gten : getresflags:=F_LE;
end
else
case nodetype of
@ -284,10 +284,10 @@ implementation
begin
if nf_swapped in flags then
case nodetype of
ltn : getresflags:=F_AE;
lten : getresflags:=F_A;
gtn : getresflags:=F_BE;
gten : getresflags:=F_B;
ltn : getresflags:=F_A;
lten : getresflags:=F_AE;
gtn : getresflags:=F_B;
gten : getresflags:=F_BE;
end
else
case nodetype of