Add Py_get_PyTypeObject_tp_bases

Author: msimacek

graalpython/com.oracle.graal.python/src/com/oracle/graal/python/builtins/modules/cext/PythonCextSlotBuiltins.java

@@ -1908,6 +1908,19 @@ static Object doTpVectorcallOffset(Object object, long offset,
         }
     }
 
+    @CApiBuiltin(ret = PyObjectBorrowed, args = {PyTypeObject}, call = Ignored)
+    public abstract static class Py_get_PyTypeObject_tp_bases extends CApiUnaryBuiltinNode {
+
+        @Specialization
+        Object doTpBases(PythonManagedClass type,
+                        @Cached TypeNodes.GetBaseClassesNode getBaseClassesNode) {
+            if (type.basesTuple == null) {
+                type.basesTuple = factory().createTuple(getBaseClassesNode.execute(type));
+            }
+            return type.basesTuple;
+        }
+    }
+
     @CApiBuiltin(name = "Py_get_dummy", ret = Pointer, args = {Pointer}, call = Ignored)
     @CApiBuiltin(name = "Py_get_PyTypeObject_tp_setattr", ret = setattrfunc, args = {PyTypeObject}, call = Ignored)
     @CApiBuiltin(name = "Py_get_PyTypeObject_tp_getattr", ret = getattrfunc, args = {PyTypeObject}, call = Ignored)
@@ -1939,7 +1952,6 @@ public Object get(@SuppressWarnings("unused") Object object) {
         }
     }
 
-    @CApiBuiltin(name = "Py_get_PyTypeObject_tp_bases", ret = PyObjectBorrowed, args = {PyTypeObject}, call = Ignored)
     @CApiBuiltin(name = "Py_get_PyTypeObject_tp_cache", ret = PyObjectBorrowed, args = {PyTypeObject}, call = Ignored)
     @CApiBuiltin(name = "Py_get_PyTypeObject_tp_weaklist", ret = PyObjectBorrowed, args = {PyTypeObject}, call = Ignored)
     public abstract static class PyGetSlotDummyPyPtr extends CApiUnaryBuiltinNode {

graalpython/com.oracle.graal.python/src/com/oracle/graal/python/builtins/objects/type/PythonManagedClass.java

@@ -78,6 +78,7 @@ public abstract class PythonManagedClass extends PythonObject implements PythonA
     @CompilationFinal private boolean mroInitialized = false;
 
     public PTuple mroStore;
+    public PTuple basesTuple;
 
     @TruffleBoundary
     protected PythonManagedClass(PythonLanguage lang, Object typeClass, Shape classShape, Shape instanceShape, TruffleString name, PythonAbstractClass... baseClasses) {