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

* use the 64 bit path in tSparcmoddivnode.pass_generate_code for all 64 bit types (including currency) on sparc64

Browse Source 
git-svn-id: trunk@36736 -
This commit is contained in:
florian 2017-07-16 09:24:18 +00:00
parent 9e1dd6d9b5
commit ac894831e4
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/sparcgen/ncpumat.pas
View File

@ -105,7 +105,7 @@ implementation
numerator := left.location.register; numerator := left.location.register;
resultreg := location.register; resultreg := location.register;
if is_64bitint(resultdef) then if is_64bit(resultdef) then
begin begin
if (nodetype = divn) and if (nodetype = divn) and
(right.nodetype = ordconstn) and (right.nodetype = ordconstn) and