1
0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-16 00:04:59 +00:00

Revert "Don't close a file that hasn't been opened (2)"

This commit is contained in:
Nick Briggs 2021-01-06 02:35:59 +00:00 committed by GitHub
parent 26dc2e44f5
commit 05d062d583
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -453,6 +453,7 @@ LispPTR COM_openfile(register LispPTR *args)
* maintain a version status.
*/
if (maintain_version(file, (FileName *)NULL, 1) == 0) {
TIMEOUT(rval = close(fd));
*Lisp_errno = errno;
return (NIL);
}