Customized support for feedback on calls to Array.

src/typing.cc

Index: src/typing.cc
diff --git a/src/typing.cc b/src/typing.cc
index 434aff349055d179256a501d2b18b6a137afaade..0d7876556e1593122680506a5a1f30f5504ea2eb 100644
--- a/src/typing.cc
+++ b/src/typing.cc
@@ -511,6 +511,11 @@ void AstTyper::VisitCall(Call* expr) {
       expr->IsUsingCallFeedbackSlot(isolate()) &&
       oracle()->CallIsMonomorphic(expr->CallFeedbackSlot())) {
     expr->set_target(oracle()->GetCallTarget(expr->CallFeedbackSlot()));
+    Handle<AllocationSite> site =
+        oracle()->GetCallAllocationSite(expr->CallFeedbackSlot());
+    if (!site.is_null()) {
+      expr->set_extra_info(oracle()->zone(), site);
+    }
   }
 
   ZoneList<Expression*>* args = expr->arguments();