Added node cost and reportPolymorphicSpecialize to MessageSendNode

Signed-off-by: Stefan Marr <[email protected]>

Author: smarr

src/trufflesom/interpreter/nodes/MessageSendNode.java

@@ -171,8 +171,6 @@ public Object doPreEvaluated(final VirtualFrame frame,
           }
           continue;
         }
-        // cache guard
-        // --> apply cache
         cache = cache.next;
       }
 
@@ -188,7 +186,31 @@ public String toString() {
 
     @Override
     public NodeCost getCost() {
-      return NodeCost.NONE;
+      if (!triedEager) {
+        return NodeCost.UNINITIALIZED;
+      }
+
+      GuardedDispatchNode cache = dispatchCache;
+
+      if (cache instanceof GenericDispatchNode) {
+        return NodeCost.MEGAMORPHIC;
+      }
+
+      int cacheSize = 0;
+      while (cache != null) {
+        cache = cache.next;
+        cacheSize += 1;
+      }
+
+      if (cacheSize == 0) {
+        return NodeCost.UNINITIALIZED;
+      }
+
+      if (cacheSize == 1) {
+        return NodeCost.MONOMORPHIC;
+      }
+
+      return NodeCost.POLYMORPHIC;
     }
 
     private PreevaluatedExpression specialize(final Object[] arguments) {
@@ -246,6 +268,7 @@ private PreevaluatedExpression specialize(final Object[] arguments) {
         }
 
         if (first != null) {
+          reportPolymorphicSpecialize();
           node.next = node.insertHere(first);
         }
         dispatchCache = insert(node);
@@ -256,6 +279,7 @@ private PreevaluatedExpression specialize(final Object[] arguments) {
       // thus, this callsite is considered to be megaprophic, and we generalize it.
       GenericDispatchNode generic = new GenericDispatchNode(selector, universe);
       dispatchCache = insert(generic);
+      reportPolymorphicSpecialize();
       return generic;
     }