paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-01 05:19:32 +01:00
Code Issues Packages Projects Releases Wiki Activity

* fixed case code for ARM.

Browse Source 
git-svn-id: trunk@5402 -
This commit is contained in:
yury 2006-11-16 13:07:32 +00:00
parent ed714baff3
commit 347af4dbe4
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/arm/narmset.pas
View File

@ -202,7 +202,7 @@ implementation
else else
begin begin
cond_lt:=F_HI; cond_lt:=F_HI;
cond_le:=F_CS; cond_le:=F_LS;
end; end;
{ do we need to generate cmps? } { do we need to generate cmps? }
if (with_sign and (min_label<0)) then if (with_sign and (min_label<0)) then