Index: src/amiga-glue.h
==================================================================
--- src/amiga-glue.h
+++ src/amiga-glue.h
@@ -100,15 +100,15 @@
 extern void glue_OFSocketAddressSetAppleTalkNetwork PPC_PARAMS(OFSocketAddress *address, uint16_t network);
 extern uint16_t glue_OFSocketAddressAppleTalkNetwork PPC_PARAMS(const OFSocketAddress *address);
 extern void glue_OFSocketAddressSetAppleTalkNode PPC_PARAMS(OFSocketAddress *address, uint8_t node);
 extern uint8_t glue_OFSocketAddressAppleTalkNode PPC_PARAMS(const OFSocketAddress *address);
 extern void glue_OFSocketAddressSetAppleTalkPort PPC_PARAMS(OFSocketAddress *address, uint8_t port);
-extern void glue_OFSocketAddressAppleTalkPort PPC_PARAMS(const OFSocketAddress *address);
+extern uint8_t glue_OFSocketAddressAppleTalkPort PPC_PARAMS(const OFSocketAddress *address);
 extern OFString *glue_OFTLSStreamErrorCodeDescription PPC_PARAMS(OFTLSStreamErrorCode errorCode);
 extern const char *_Nullable glue_OFStrPTime PPC_PARAMS(const char *buffer, const char *format, struct tm *tm, int16_t *_Nullable tz);
 extern OFStringEncoding glue_OFStringEncodingParseName PPC_PARAMS(OFString *string);
 extern OFString *_Nullable glue_OFStringEncodingName PPC_PARAMS(OFStringEncoding encoding);
 extern size_t glue_OFUTF16StringLength PPC_PARAMS(const OFChar16 *string);
 extern size_t glue_OFUTF32StringLength PPC_PARAMS(const OFChar32 *string);
 extern OFString *_Nonnull glue_OFZIPArchiveEntryVersionToString PPC_PARAMS(uint16_t version);
 extern OFString *_Nonnull glue_OFZIPArchiveEntryCompressionMethodName PPC_PARAMS(OFZIPArchiveEntryCompressionMethod compressionMethod);
 extern size_t glue_OFZIPArchiveEntryExtraFieldFind PPC_PARAMS(OFData *extraField, OFZIPArchiveEntryExtraFieldTag tag, uint16_t *size);

Index: src/amiga-glue.m
==================================================================
--- src/amiga-glue.m
+++ src/amiga-glue.m
@@ -509,16 +509,16 @@
 	M68K_ARG(uint8_t, port, (nil))
 
 	OFSocketAddressSetAppleTalkPort(address, port);
 }
 
-void __saveds
+uint8_t __saveds
 glue_OFSocketAddressAppleTalkPort PPC_PARAMS(const OFSocketAddress *address)
 {
 	M68K_ARG(const OFSocketAddress *, address, a0)
 
-	OFSocketAddressAppleTalkPort(address);
+	return OFSocketAddressAppleTalkPort(address);
 }
 
 OFString * __saveds
 glue_OFTLSStreamErrorCodeDescription PPC_PARAMS(OFTLSStreamErrorCode errorCode)
 {

Index: src/amiga-library.xml
==================================================================
--- src/amiga-library.xml
+++ src/amiga-library.xml
@@ -211,11 +211,11 @@
   </function>
   <function name='OFSocketAddressSetAppleTalkPort'>
     <argument name='address' type='OFSocketAddress *' m68k-reg='a0'/>
     <argument name='port' type='uint8_t' m68k-arg='d0'/>
   </function>
-  <function name='OFSocketAddressAppleTalkPort' return='uint8_t'>
+  <function name='OFSocketAddressAppleTalkPort' return-type='uint8_t'>
     <argument name='address' type='const OFSocketAddress *' m68k-reg='a0'/>
   </function>
   <include>OFTLSStream.h</include>
   <function name='OFTLSStreamErrorCodeDescription' return-type='OFString *'>
     <argument name='errorCode' type='OFTLSStreamErrorCode' m68k-reg='d0'/>

Index: src/linklib/linklib.m
==================================================================
--- src/linklib/linklib.m
+++ src/linklib/linklib.m
@@ -1024,24 +1024,24 @@
 
 	__extension__ ((void (*)(OFSocketAddress *, uint8_t))*(void **)(((uintptr_t)ObjFWBase) - 370))(address, port);
 #endif
 }
 
-void
+uint8_t
 OFSocketAddressAppleTalkPort(const OFSocketAddress *address)
 {
 #if defined(OF_AMIGAOS_M68K)
 	register struct Library *a6 __asm__("a6") = ObjFWBase;
 	(void)a6;
-	((void (*)(const OFSocketAddress *__asm__("a0")))(((uintptr_t)ObjFWBase) - 378))(address);
+	return ((uint8_t (*)(const OFSocketAddress *__asm__("a0")))(((uintptr_t)ObjFWBase) - 378))(address);
 #elif defined(OF_MORPHOS)
 	__asm__ __volatile__ (
 	    "mr		%%r12, %0"
 	    :: "r"(ObjFWBase) : "r12"
 	);
 
-	__extension__ ((void (*)(const OFSocketAddress *))*(void **)(((uintptr_t)ObjFWBase) - 376))(address);
+	return __extension__ ((uint8_t (*)(const OFSocketAddress *))*(void **)(((uintptr_t)ObjFWBase) - 376))(address);
 #endif
 }
 
 OFString *
 OFTLSStreamErrorCodeDescription(OFTLSStreamErrorCode errorCode)