--- gcc/objc/misc.c	2018/04/24 18:10:17	1.1
+++ gcc/objc/misc.c	2018/04/24 18:20:16	1.1.1.2
@@ -1,5 +1,5 @@
 /* GNU Objective C Runtime Miscellanious 
-   Copyright (C) 1993 Free Software Foundation, Inc.
+   Copyright (C) 1993, 1994 Free Software Foundation, Inc.
 
 Author: Kresten Krab Thorup
 
@@ -30,6 +30,12 @@ void objc_error(id object, const char* f
 
 void (*_objc_error)(id, const char*, va_list) = objc_error;
 
+#ifdef __alpha__
+#include <stdlib.h>
+extern int write (int, const char*, int);
+extern size_t strlen (const char*);
+#endif
+
 void
 objc_error(id object, const char* fmt, va_list ap)
 {
@@ -40,7 +46,7 @@ objc_error(id object, const char* fmt, v
 volatile void
 objc_fatal(const char* msg)
 {
-  write(2, msg, (size_t)strlen((char*)msg));
+  write(2, msg, (int)strlen((const char*)msg));
   abort();
 }