Vectors should be made shared when required by the use of the copy and not at...

Vectors should be made shared when required by the use of the copy and not at the point of making the copy itself.

com.oracle.truffle.r.runtime/src/com/oracle/truffle/r/runtime/data/RComplexVector.java

@@ -75,7 +75,6 @@ public final class RComplexVector extends RVector implements RAbstractComplexVec
     }
 
     public RComplexVector copyWithNewDimensions(int[] newDimensions) {
-        this.makeShared();
         return RDataFactory.createComplexVector(data, isComplete(), newDimensions);
     }
 

com.oracle.truffle.r.runtime/src/com/oracle/truffle/r/runtime/data/RDoubleVector.java

@@ -89,7 +89,6 @@ public final class RDoubleVector extends RVector implements RAbstractDoubleVecto
     }
 
     public RDoubleVector copyWithNewDimensions(int[] newDimensions) {
-        this.makeShared();
         return RDataFactory.createDoubleVector(data, isComplete(), newDimensions);
     }
 

com.oracle.truffle.r.runtime/src/com/oracle/truffle/r/runtime/data/RIntVector.java

@@ -87,7 +87,6 @@ public final class RIntVector extends RVector implements RAbstractIntVector {
     }
 
     public RIntVector copyWithNewDimensions(int[] newDimensions) {
-        this.makeShared();
         return RDataFactory.createIntVector(data, isComplete(), newDimensions);
     }
 

com.oracle.truffle.r.runtime/src/com/oracle/truffle/r/runtime/data/RList.java

@@ -104,7 +104,6 @@ public final class RList extends RVector implements RAbstractVector {
 
     @Override
     public RList copyWithNewDimensions(int[] newDimensions) {
-        this.makeShared();
         return RDataFactory.createList(data, newDimensions);
     }
 

com.oracle.truffle.r.runtime/src/com/oracle/truffle/r/runtime/data/RLogicalVector.java

@@ -131,7 +131,6 @@ public final class RLogicalVector extends RVector implements RAbstractLogicalVec
 
     @Override
     public RLogicalVector copyWithNewDimensions(int[] newDimensions) {
-        this.makeShared();
         return RDataFactory.createLogicalVector(data, isComplete(), newDimensions);
     }
 

com.oracle.truffle.r.runtime/src/com/oracle/truffle/r/runtime/data/RRawVector.java

@@ -65,7 +65,6 @@ public final class RRawVector extends RVector implements RAbstractRawVector {
     }
 
     public RRawVector copyWithNewDimensions(int[] newDimensions) {
-        this.makeShared();
         return RDataFactory.createRawVector(data, newDimensions);
     }
 

com.oracle.truffle.r.runtime/src/com/oracle/truffle/r/runtime/data/RStringVector.java

@@ -135,7 +135,6 @@ public final class RStringVector extends RVector implements RAbstractStringVecto
 
     @Override
     public RStringVector copyWithNewDimensions(int[] newDimensions) {
-        this.makeShared();
         return RDataFactory.createStringVector(data, isComplete(), newDimensions);
     }