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

High level codegen: set MM register type for vectors

Browse Source
This commit is contained in:
Jonas Maebe 2022-09-08 11:09:20 +02:00
parent a6c7ed5e61
commit f51798e449
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/hlcgobj.pas
View File

@ -856,7 +856,9 @@ implementation
formaldef:
result:=R_ADDRESSREGISTER;
arraydef:
if tstoreddef(def).is_intregable then
if tarraydef(def).is_hwvector then
result:=R_MMREGISTER
else if tstoreddef(def).is_intregable then
result:=R_INTREGISTER
else
result:=R_ADDRESSREGISTER;