# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 870893973 0
# Node ID c4868437233501fbacbe80614dad2bffc0333c15
# Parent  09d4a6c290aeb57021f89a9f69937fc7ccd80141
(lock_file_1, lock_file): Add casts.

diff -r 09d4a6c290ae -r c48684372335 src/filelock.c
--- a/src/filelock.c	Wed Aug 06 18:56:43 1997 +0000
+++ b/src/filelock.c	Wed Aug 06 18:59:33 1997 +0000
@@ -138,14 +138,14 @@
   char *lock_info_str;
 
   if (STRINGP (Fuser_login_name (Qnil)))
-    user_name = XSTRING (Fuser_login_name (Qnil))->data;
+    user_name = (char *)XSTRING (Fuser_login_name (Qnil))->data;
   else
     user_name = "";
   if (STRINGP (Fsystem_name ()))
-    host_name = XSTRING (Fsystem_name ())->data;
+    host_name = (char *)XSTRING (Fsystem_name ())->data;
   else
     host_name = "";
-  lock_info_str = alloca (strlen (user_name) + strlen (host_name)
+  lock_info_str = (char *)alloca (strlen (user_name) + strlen (host_name)
 			  + LOCK_PID_MAX + 5);
 
   sprintf (lock_info_str, "%s@%s.%lu", user_name, host_name,
@@ -345,8 +345,8 @@
     return;
 
   /* Else consider breaking the lock */
-  locker = alloca (strlen (lock_info.user) + strlen (lock_info.host)
-                   + LOCK_PID_MAX + 9);
+  locker = (char *) alloca (strlen (lock_info.user) + strlen (lock_info.host)
+			    + LOCK_PID_MAX + 9);
   sprintf (locker, "%s@%s (pid %d)", lock_info.user, lock_info.host,
            lock_info.pid);
   FREE_LOCK_INFO (lock_info);