Raymond Toy pushed to branch issue-408-get-user-name-and-homedir at cmucl / cmucl

Commits:

2 changed files:

Changes:

  • src/code/unix.lisp
    ... ... @@ -2552,7 +2552,7 @@
    2552 2552
     	   (progn
    
    2553 2553
     	     (setf result
    
    2554 2554
     		   (alien-funcall
    
    2555
    -		    (extern-alien "os_get_username"
    
    2555
    +		    (extern-alien "os_get_user_name"
    
    2556 2556
     				  (function (* c-call:c-string)
    
    2557 2557
     					    uid-t
    
    2558 2558
     					    (* c-call:int)))
    

  • src/lisp/os-common.c
    ... ... @@ -779,7 +779,7 @@ again:
    779 779
      * returned.
    
    780 780
      */
    
    781 781
     char *
    
    782
    -os_get_username(uid_t uid, int *status)
    
    782
    +os_get_user_name(uid_t uid, int *status)
    
    783 783
     {
    
    784 784
         char *buf;
    
    785 785
         char *name;
    
    ... ... @@ -821,7 +821,7 @@ os_file_author(const char *path)
    821 821
             return NULL;
    
    822 822
         }
    
    823 823
     
    
    824
    -    return os_get_username(sb.st_uid, &status);
    
    824
    +    return os_get_user_name(sb.st_uid, &status);
    
    825 825
     }
    
    826 826
     
    
    827 827
     int
    
    ... ... @@ -1037,4 +1037,3 @@ os_getcwd(void)
    1037 1037
     {
    
    1038 1038
         return getcwd(NULL, 0);
    
    1039 1039
     }
    1040
    -