Index: src/runtime/amiga-glue.m
==================================================================
--- src/runtime/amiga-glue.m
+++ src/runtime/amiga-glue.m
@@ -822,18 +822,10 @@
 	M68K_ARG(id, object, a0)
 
 	return object_isTaggedPointer(object);
 }
 
-Class __saveds
-glue_object_getTaggedPointerClass PPC_PARAMS(id object)
-{
-	M68K_ARG(id, object, a0)
-
-	return object_getTaggedPointerClass(object);
-}
-
 uintptr_t __saveds
 glue_object_getTaggedPointerValue PPC_PARAMS(id object)
 {
 	M68K_ARG(id, object, a0)
 

Index: src/runtime/amiga-library.m
==================================================================
--- src/runtime/amiga-library.m
+++ src/runtime/amiga-library.m
@@ -148,11 +148,10 @@
 extern void glue_objc_hashtable_delete(void);
 extern void glue_objc_hashtable_free(void);
 extern void glue_objc_setTaggedPointerSecret(void);
 extern int glue_objc_registerTaggedPointerClass(void);
 extern bool glue_object_isTaggedPointer(void);
-extern Class glue_object_getTaggedPointerClass(void);
 extern uintptr_t glue_object_getTaggedPointerValue(void);
 extern id glue_objc_createTaggedPointer(void);
 
 #ifdef OF_MORPHOS
 const ULONG __abox__ = 1;
@@ -690,11 +689,10 @@
 	(CONST_APTR)glue_objc_hashtable_delete,
 	(CONST_APTR)glue_objc_hashtable_free,
 	(CONST_APTR)glue_objc_setTaggedPointerSecret,
 	(CONST_APTR)glue_objc_registerTaggedPointerClass,
 	(CONST_APTR)glue_object_isTaggedPointer,
-	(CONST_APTR)glue_object_getTaggedPointerClass,
 	(CONST_APTR)glue_object_getTaggedPointerValue,
 	(CONST_APTR)glue_objc_createTaggedPointer,
 	(CONST_APTR)-1,
 #ifdef OF_MORPHOS
 	(CONST_APTR)FUNCARRAY_END

Index: src/runtime/amigaos3.sfd
==================================================================
--- src/runtime/amigaos3.sfd
+++ src/runtime/amigaos3.sfd
@@ -91,9 +91,8 @@
 void glue_objc_hashtable_free(struct objc_hashtable *_Nonnull table)(a0)
 * Public functions again
 void glue_objc_setTaggedPointerSecret(uintptr_t secret)(d0)
 int glue_objc_registerTaggedPointerClass(Class _Nonnull class_)(a0)
 bool glue_object_isTaggedPointer(id _Nullable object)(a0)
-Class _Nullable glue_object_getTaggedPointerClass(id _Nonnull object)(a0)
 uintptr_t glue_object_getTaggedPointerValue(id _Nonnull object)(a0)
 id _Nullable glue_objc_createTaggedPointer(int class_, uintptr_t value)(d0,d1)
 ==end

Index: src/runtime/linklib/linklib.m
==================================================================
--- src/runtime/linklib/linklib.m
+++ src/runtime/linklib/linklib.m
@@ -724,16 +724,10 @@
 object_isTaggedPointer(id object)
 {
 	return glue_object_isTaggedPointer(object);
 }
 
-Class
-object_getTaggedPointerClass(id object)
-{
-	return glue_object_getTaggedPointerClass(object);
-}
-
 uintptr_t
 object_getTaggedPointerValue(id object)
 {
 	return glue_object_getTaggedPointerValue(object);
 }

Index: src/runtime/morphos-clib.h
==================================================================
--- src/runtime/morphos-clib.h
+++ src/runtime/morphos-clib.h
@@ -86,8 +86,7 @@
 void glue_objc_hashtable_free(struct objc_hashtable *);
 /* Public functions again */
 void glue_objc_setTaggedPointerSecret(uintptr_t);
 int glue_objc_registerTaggedPointerClass(Class);
 bool glue_object_isTaggedPointer(id);
-Class _Nullable glue_object_getTaggedPointerClass(id);
 uintptr_t glue_object_getTaggedPointerValue(id);
 id glue_objc_createTaggedPointer(int, uintptr_t);

Index: src/runtime/morphos.fd
==================================================================
--- src/runtime/morphos.fd
+++ src/runtime/morphos.fd
@@ -89,9 +89,8 @@
 glue_objc_hashtable_free(table)(sysv,r12base)
 * Public functions again
 glue_objc_setTaggedPointerSecret(secret)(sysv,r12base)
 glue_objc_registerTaggedPointerClass(class_)(sysv,r12base)
 glue_object_isTaggedPointer(object)(sysv,r12base)
-glue_object_getTaggedPointerClass(object)(sysv,r12base)
 glue_object_getTaggedPointerValue(object)(sysv,r12base)
 glue_objc_createTaggedPointer(class_,value)(sysv,r12base)
 ##end