Add some tests for foreign strings repetition

Author: eregon

graalpython/com.oracle.graal.python.tck/src/com/oracle/graal/python/tck/PythonProvider.java

@@ -235,6 +235,7 @@ public Collection<? extends Snippet> createExpressions(Context context) {
         addExpressionSnippet(context, snippets, "+", "lambda x, y: x + y", union(STRING, array(ANY)), AddVerifier.INSTANCE, numeric, union(STRING, array(ANY)));
         addExpressionSnippet(context, snippets, "+", "lambda x, y: x + y", union(STRING, array(ANY)), AddVerifier.INSTANCE, union(STRING, array(ANY)), numeric);
         addExpressionSnippet(context, snippets, "+", "lambda x, y: x + y", union(STRING, array(ANY)), AddVerifier.INSTANCE, union(STRING, array(ANY)), union(STRING, array(ANY)));
+
         addExpressionSnippet(context, snippets, "*", "lambda x, y: x * y", NUMBER, new NonPrimitiveNumberParameterThrows(MulVerifier.INSTANCE), numeric, numeric);
         addExpressionSnippet(context, snippets, "*", "lambda x, y: x * y", union(STRING, array(ANY)), MulVerifier.INSTANCE, numeric, union(STRING, array(ANY)));
         addExpressionSnippet(context, snippets, "*", "lambda x, y: x * y", union(STRING, array(ANY)), MulVerifier.INSTANCE, union(STRING, array(ANY)), numeric);

graalpython/com.oracle.graal.python.test/src/tests/test_interop.py

@@ -1069,6 +1069,14 @@ def test_foreign_number_list(self):
         assert l > n
         assert n < l
 
+    def test_foreign_string(self):
+        s = __graalpython__.foreign_wrapper("ab")
+
+        self.assertEqual(['ForeignString', 'foreign', 'object'], [t.__name__ for t in type(s).mro()])
+
+        assert s * 3 == "ababab"
+        assert 3 * s == "ababab"
+
     def test_foreign_repl(self):
         from java.util.logging import LogRecord
         from java.util.logging import Level

graalpython/com.oracle.graal.python/src/com/oracle/graal/python/builtins/modules/GraalPythonModuleBuiltins.java

@@ -279,6 +279,7 @@ public void postInitialize(Python3Core core) {
             mod.setAttribute(tsLiteral("is_strong_handle_table_ref"), PNone.NO_VALUE);
             mod.setAttribute(tsLiteral("clear_interop_type_registry"), PNone.NO_VALUE);
             mod.setAttribute(tsLiteral("foreign_number_list"), PNone.NO_VALUE);
+            mod.setAttribute(tsLiteral("foreign_wrapper"), PNone.NO_VALUE);
         }
         if (PythonImageBuildOptions.WITHOUT_PLATFORM_ACCESS || !context.getOption(PythonOptions.RunViaLauncher)) {
             mod.setAttribute(tsLiteral("list_files"), PNone.NO_VALUE);
@@ -1191,4 +1192,24 @@ long getArraySize() {
             }
         }
     }
+
+    @Builtin(name = "foreign_wrapper", maxNumOfPositionalArgs = 1)
+    @GenerateNodeFactory
+    public abstract static class ForeignWrapperNode extends PythonBuiltinNode {
+
+        @Specialization
+        @TruffleBoundary
+        Object foreignWrapper(Object object) {
+            return new ForeignWrapper(object);
+        }
+
+        @ExportLibrary(value = InteropLibrary.class, delegateTo = "object")
+        static final class ForeignWrapper implements TruffleObject {
+            final Object object;
+
+            ForeignWrapper(Object object) {
+                this.object = object;
+            }
+        }
+    }
 }