Move string interning to a primitive.

Author: aardvark179

src/main/java/org/truffleruby/core/string/StringNodes.java

@@ -125,6 +125,7 @@
 import org.truffleruby.core.rope.RopeBuilder;
 import org.truffleruby.core.rope.RopeConstants;
 import org.truffleruby.core.rope.RopeGuards;
+import org.truffleruby.core.rope.RopeKey;
 import org.truffleruby.core.rope.RopeNodes;
 import org.truffleruby.core.rope.RopeNodes.RepeatNode;
 import org.truffleruby.core.rope.RopeOperations;
@@ -4712,4 +4713,13 @@ protected Object emptyString(DynamicObject string) {
 
     }
 
+    @Primitive(name = "string_intern", needsSelf = false)
+    public abstract static class InternNode extends PrimitiveArrayArgumentsNode {
+
+        @Specialization
+        public DynamicObject internString(DynamicObject string) {
+            return getContext().getInternedStringCache().addInCacheIfAbsent(new RopeKey(Layouts.STRING.getRope(string), getContext().getHashing(this)), string);
+        }
+    }
+
 }

src/main/java/org/truffleruby/core/string/TruffleStringNodes.java

@@ -13,12 +13,10 @@
 import com.oracle.truffle.api.dsl.Cached;
 import com.oracle.truffle.api.dsl.Specialization;
 import com.oracle.truffle.api.object.DynamicObject;
-import org.truffleruby.Layouts;
 import org.truffleruby.builtins.CoreClass;
 import org.truffleruby.builtins.CoreMethod;
 import org.truffleruby.builtins.CoreMethodArrayArgumentsNode;
 import org.truffleruby.core.rope.Rope;
-import org.truffleruby.core.rope.RopeKey;
 import org.truffleruby.core.rope.RopeNodes;
 import org.truffleruby.language.RubyGuards;
 import org.truffleruby.language.control.RaiseException;
@@ -72,12 +70,4 @@ private String formatTooLongError(int count, final Rope rope) {
 
     }
 
-    @CoreMethod(names = "intern_string", onSingleton = true, required = 1)
-    public abstract static class InternNode extends CoreMethodArrayArgumentsNode {
-
-        @Specialization
-        public DynamicObject internString(DynamicObject string) {
-            return getContext().getInternedStringCache().addInCacheIfAbsent(new RopeKey(Layouts.STRING.getRope(string), getContext().getHashing(this)), string);
-        }
-    }
 }

src/main/ruby/core/string.rb

@@ -1591,7 +1591,7 @@ def +@
 
   def -@
     str = frozen? ? self : dup.freeze
-    Truffle::StringOperations.intern_string(str)
+    Truffle.invoke_primitive(:string_intern, str)
   end
 
   def encoding