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/4d0d6006bd9b85dae184edfd...