comparison src/filelock.c @ 18707:23039b06955a

(current_lock_owner, lock_file_1): Add casts.

18706:4af0aa969bbe

lock_file_1 (lfname, force)
     char *lfname; 
     int force;
{
  register int err;
  char *user_name = XSTRING (Fuser_login_name (Qnil))->data;
  char *host_name = XSTRING (Fsystem_name ())->data;
  char *lock_info_str = alloca (strlen (user_name) + strlen (host_name)
                                + LOCK_PID_MAX + 5);

  sprintf (lock_info_str, "%s@%s.%lu", user_name, host_name,
           (unsigned long) getpid ());

  
  /* Even if the caller doesn't want the owner info, we still have to
     read it to determine return value, so allocate it.  */
  if (!owner)
    {
      owner = alloca (sizeof (lock_info_type));
      local_owner = 1;
    }
  
  /* Parse [e-mail].  If can't parse, return -1.  */
  /* The USER is everything before the first @.  */

18707:23039b06955a

lock_file_1 (lfname, force)
     char *lfname; 
     int force;
{
  register int err;
  char *user_name = (char *) XSTRING (Fuser_login_name (Qnil))->data;
  char *host_name = (char *) XSTRING (Fsystem_name ())->data;
  char *lock_info_str = alloca (strlen (user_name) + strlen (host_name)
                                + LOCK_PID_MAX + 5);

  sprintf (lock_info_str, "%s@%s.%lu", user_name, host_name,
           (unsigned long) getpid ());

  
  /* Even if the caller doesn't want the owner info, we still have to
     read it to determine return value, so allocate it.  */
  if (!owner)
    {
      owner = (lock_info_type *) alloca (sizeof (lock_info_type));
      local_owner = 1;
    }
  
  /* Parse [e-mail].  If can't parse, return -1.  */
  /* The USER is everything before the first @.  */