[Git][cmucl/cmucl][issue-130-file-author-in-c] Only free buffer if it's not the stack buffer

[Raymond Toy (@rtoy)]

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


Commits:
4d0d6006 by Raymond Toy at 2022-09-05T15:41:50-07:00
Only free buffer if it's not the stack buffer

- - - - -


1 changed file:

- src/lisp/os-common.c


Changes:

=====================================
src/lisp/os-common.c
=====================================
@@ -776,6 +776,9 @@ os_file_author(const char *path)
 exit:
     fprintf(stderr, "buffer, initial = %p %p\n", buffer, initial);
     
-    free(buffer);
+    if (buffer != initial) {
+        free(buffer);
+    }
+    
     return result;
 }



View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/4d0d6006bd9b85dae184edfd5b1b0d4a0af8daf6

-- 
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/4d0d6006bd9b85dae184edfd5b1b0d4a0af8daf6
You're receiving this email because of your account on gitlab.common-lisp.net.


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cmucl-cvs/attachments/20220905/c8305351/attachment.html>