node costs in ShareObjectNode, some "final" attributes on classes

com.oracle.truffle.r.nodes/src/com/oracle/truffle/r/nodes/function/RCallNode.java

@@ -103,7 +103,7 @@ import com.oracle.truffle.r.runtime.nodes.RSyntaxElement;
 import com.oracle.truffle.r.runtime.nodes.RSyntaxLookup;
 import com.oracle.truffle.r.runtime.nodes.RSyntaxNode;
 
-class ForcePromiseNode extends RNode {
+final class ForcePromiseNode extends RNode {
 
     @Child private RNode valueNode;
     @Child private PromiseHelperNode promiseHelper;
@@ -536,7 +536,7 @@ public abstract class RCallNode extends RCallBaseNode implements RSyntaxNode, RS
         return call.execute(frame, resultFunction, new RArgsValuesAndNames(args, argsSignature), s3Args, s3DefaulArguments);
     }
 
-    protected class ForeignCall extends Node {
+    protected final class ForeignCall extends Node {
 
         @Child private CallArgumentsNode arguments;
         @Child private Node foreignCall;

com.oracle.truffle.r.nodes/src/com/oracle/truffle/r/nodes/function/opt/ShareObjectNode.java

@@ -22,9 +22,12 @@
  */
 package com.oracle.truffle.r.nodes.function.opt;
 
+import static com.oracle.truffle.api.nodes.NodeCost.NONE;
+
 import com.oracle.truffle.api.dsl.Cached;
 import com.oracle.truffle.api.dsl.Specialization;
 import com.oracle.truffle.api.nodes.Node;
+import com.oracle.truffle.api.nodes.NodeInfo;
 import com.oracle.truffle.api.profiles.ConditionProfile;
 import com.oracle.truffle.r.runtime.data.RShareable;
 
@@ -33,6 +36,7 @@ import com.oracle.truffle.r.runtime.data.RShareable;
  * If the object is not instance of {@link RShareable} or if it is shared permanent, then does
  * nothing.
  */
+@NodeInfo(cost = NONE)
 public abstract class ShareObjectNode extends Node {
     public abstract Object execute(Object obj);