|
@@ -856,7 +856,9 @@ implementation
|
|
formaldef:
|
|
formaldef:
|
|
result:=R_ADDRESSREGISTER;
|
|
result:=R_ADDRESSREGISTER;
|
|
arraydef:
|
|
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
|
|
result:=R_INTREGISTER
|
|
else
|
|
else
|
|
result:=R_ADDRESSREGISTER;
|
|
result:=R_ADDRESSREGISTER;
|