Raymond Toy pushed to branch issue-130-file-author-in-c at cmucl / cmucl

Commits:

1 changed file:

Changes:

  • src/lisp/os-common.c
    ... ... @@ -756,7 +756,6 @@ os_file_author(const char *path)
    756 756
         
    
    757 757
         while (1) {
    
    758 758
             buf2 = realloc(buf, bufsize);
    
    759
    -        fprintf(stderr, "buf2 = %p, size %zu\n", buf2, bufsize);
    
    760 759
             
    
    761 760
             if (buf2 == NULL) {
    
    762 761
                 result = NULL;
    
    ... ... @@ -783,17 +782,12 @@ os_file_author(const char *path)
    783 782
         }
    
    784 783
         
    
    785 784
         if (result) {
    
    786
    -        fprintf(stderr, "Allocate %d bytes for author\n",
    
    787
    -                strlen(result->pw_name + 1));
    
    788
    -        
    
    789 785
             author = malloc(strlen(result->pw_name) + 1);
    
    790 786
             if (author) {
    
    791
    -            fprintf(stderr, "author = %p\n", author);
    
    792 787
                 strcpy(author, result->pw_name);
    
    793 788
             }
    
    794 789
         }
    
    795 790
     
    
    796
    -    fprintf(stderr, "Free buf %p\n", buf);
    
    797 791
         if (buf) {
    
    798 792
             free(buf);
    
    799 793
         }