AArch64: Implement aladdEvaluator()

This commit implements aladdEvaluator() for AArch64. Signed-off-by: KONNO Kazuhiro <konno@jp.ibm.com>
eclipse · Jul 22, 2019 · 5d71ecf · 5d71ecf
1 parent babee32
commit 5d71ecf
Show file tree

Hide file tree

Showing 2 changed files with 47 additions and 3 deletions.
diff --git a/compiler/aarch64/codegen/BinaryEvaluator.cpp b/compiler/aarch64/codegen/BinaryEvaluator.cpp
@@ -29,6 +29,7 @@
 #include "codegen/TreeEvaluator.hpp"
 #include "il/Node.hpp"
 #include "il/Node_inlines.hpp"
+#include "il/symbol/AutomaticSymbol.hpp"
 #include "infra/Bit.hpp"
 
 /**
@@ -247,7 +248,7 @@ OMR::ARM64::TreeEvaluator::imulEvaluator(TR::Node *node, TR::CodeGenerator *cg)
 
    if (secondChild->getOpCode().isLoadConst() && secondChild->getRegister() == NULL)
       {
-         mulConstant32(node, trgReg, src1Reg, value, cg);
+      mulConstant32(node, trgReg, src1Reg, value, cg);
       }
    else
       {
@@ -612,3 +613,46 @@ OMR::ARM64::TreeEvaluator::lxorEvaluator(TR::Node *node, TR::CodeGenerator *cg)
 	// boolean xor of 2 integers
 	return genericBinaryEvaluator(node, TR::InstOpCode::eorx, TR::InstOpCode::eorimmx, true, cg);
 	}
+
+TR::Register *
+OMR::ARM64::TreeEvaluator::aladdEvaluator(TR::Node *node, TR::CodeGenerator *cg)
+   {
+   TR::Register *trgReg = laddEvaluator(node, cg);
+
+   if (node->isInternalPointer())
+      {
+      TR::AutomaticSymbol *pinningArrayPointerSymbol = NULL;
+
+      if (node->getPinningArrayPointer())
+         {
+         pinningArrayPointerSymbol = node->getPinningArrayPointer();
+         }
+      else
+         {
+         TR::Node *firstChild = node->getFirstChild();
+         if ((firstChild->getOpCodeValue() == TR::aload) &&
+             firstChild->getSymbolReference()->getSymbol()->isAuto() &&
+             firstChild->getSymbolReference()->getSymbol()->isPinningArrayPointer())
+            {
+            TR::Symbol *firstChildSymbol = firstChild->getSymbolReference()->getSymbol();
+
+            pinningArrayPointerSymbol = firstChildSymbol->isInternalPointer() ?
+               firstChildSymbol->castToInternalPointerAutoSymbol()->getPinningArrayPointer() :
+               firstChildSymbol->castToAutoSymbol();
+            }
+         else if (firstChild->getRegister() &&
+                  firstChild->getRegister()->containsInternalPointer())
+            {
+            pinningArrayPointerSymbol = firstChild->getRegister()->getPinningArrayPointer();
+            }
+         }
+
+      if (pinningArrayPointerSymbol)
+         {
+         trgReg->setContainsInternalPointer();
+         trgReg->setPinningArrayPointer(pinningArrayPointerSymbol);
+         }
+      }
+
+   return trgReg;
+   }
diff --git a/compiler/aarch64/codegen/OMRTreeEvaluatorTable.hpp b/compiler/aarch64/codegen/OMRTreeEvaluatorTable.hpp
@@ -614,8 +614,8 @@
     TR::TreeEvaluator::unImpOpEvaluator ,        // TODO:ARM64: Enable when Implemented: TR::TreeEvaluator::caddEvaluator ,	// TR::cadd		// add 2 unsigned short integers
     TR::TreeEvaluator::unImpOpEvaluator ,        // TODO:ARM64: Enable when Implemented: TR::TreeEvaluator::aiaddEvaluator ,	// TR::aiadd		// add integer to address with address result (child1 a; child2 i)
     TR::TreeEvaluator::unImpOpEvaluator ,        // TODO:ARM64: Enable when Implemented: TR::TreeEvaluator::aiuaddEvaluator ,	// TR::aiuadd		// add unsigned integer to address with address result (child1 a; child2 i)
-    TR::TreeEvaluator::unImpOpEvaluator ,        // TODO:ARM64: Enable when Implemented: TR::TreeEvaluator::aladdEvaluator ,	// TR::aladd		// add long integer to address with address result (child1 a; child2 i) (64-bit only)
-    TR::TreeEvaluator::unImpOpEvaluator ,        // TODO:ARM64: Enable when Implemented: TR::TreeEvaluator::aluaddEvaluator ,	// TR::aluadd		// add unsigned long integer to address with address result (child1 a; child2 i) (64-bit only)
+    TR::TreeEvaluator::aladdEvaluator, // TR::aladd		// add long integer to address with address result (child1 a; child2 i) (64-bit only)
+    TR::TreeEvaluator::aladdEvaluator, // TR::aluadd		// add unsigned long integer to address with address result (child1 a; child2 i) (64-bit only)
     TR::TreeEvaluator::unImpOpEvaluator ,        // TODO:ARM64: Enable when Implemented: TR::TreeEvaluator::lusubhEvaluator ,	// TR::lusubh		// subtract 2 unsigned long integers (the high parts of prior lusub) as high part of 128bit subtraction.
     TR::TreeEvaluator::unImpOpEvaluator ,        // TODO:ARM64: Enable when Implemented: TR::TreeEvaluator::csubEvaluator ,	// TR::csub		// subtract 2 unsigned short integers (child1 - child2)
     TR::TreeEvaluator::imulhEvaluator, // TR::imulh		// multiply 2 integers; and return the high word of the product