paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-20 16:09:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

m68k: in int to bool conversion, only try to zero/sign extend the value, if the destination is actually larger than the source

Browse Source 
git-svn-id: trunk@35105 -
This commit is contained in:
Károly Balogh 2016-12-11 03:57:55 +00:00
parent 8fee10f45b
commit 15f67e6f5b
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/m68k/n68kcnv.pas
View File

@ -178,7 +178,7 @@ implementation
location_copy(location,left.location);
newsize:=def_cgsize(resultdef);
{ change of size? change sign only if location is LOC_(C)REGISTER? Then we have to sign/zero-extend }
if (tcgsize2size[newsize]<>tcgsize2size[left.location.size]) or
if (tcgsize2size[newsize]>tcgsize2size[left.location.size]) or
((newsize<>left.location.size) and (location.loc in [LOC_REGISTER,LOC_CREGISTER])) then
hlcg.location_force_reg(current_asmdata.CurrAsmList,location,left.resultdef,resultdef,true)
else