diff options
author | Andy Wingo <wingo@pobox.com> | 2021-03-10 20:35:58 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2021-03-10 20:40:10 +0100 |
commit | 85433fc2b122dc78342c3c83941949d1d9318399 (patch) | |
tree | 2fff776765468df861dc8a8c5e80f551b4905a5f /libguile/posix.c | |
parent | 89a299102ff3597a48febe1fb6d3097fddcda40e (diff) | |
download | guile-85433fc2b122dc78342c3c83941949d1d9318399.tar.gz |
Add mkstemp; undocument mkstemp!
* doc/ref/posix.texi (File System): Update to document mkstemp only.
* libguile/filesys.c: Make a mkstemp that doesn't modify the input
template. Instead the caller has to get the file name from
port-filename.
(scm_mkstemp): Use the new mkstemp to implement mkstemp!. Can't
deprecate yet though as the replacement hasn't been there for long
enough.
* libguile/posix.c (scm_tempnam): Update to mention mkstemp instead.
* module/system/base/compile.scm (call-with-output-file/atomic): Use
mkstemp.
* test-suite/tests/posix.test:
* test-suite/tests/r6rs-files.test: Use mkstemp.
* NEWS: Update.
Diffstat (limited to 'libguile/posix.c')
-rw-r--r-- | libguile/posix.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/posix.c b/libguile/posix.c index 47769003a..eaf12de32 100644 --- a/libguile/posix.c +++ b/libguile/posix.c @@ -1,4 +1,4 @@ -/* Copyright 1995-2014,2016-2019 +/* Copyright 1995-2014,2016-2019,2021 Free Software Foundation, Inc. This file is part of Guile. @@ -1572,14 +1572,14 @@ SCM_DEFINE (scm_tmpnam, "tmpnam", 0, 0, 0, "existing file. However there is no guarantee that another\n" "process will not create the file after @code{tmpnam} is called.\n" "Care should be taken if opening the file, e.g., use the\n" - "@code{O_EXCL} open flag or use @code{mkstemp!} instead.") + "@code{O_EXCL} open flag or use @code{mkstemp} instead.") #define FUNC_NAME s_scm_tmpnam { char name[L_tmpnam]; char *rv; scm_c_issue_deprecation_warning - ("Use of tmpnam is deprecated. Use mkstemp! instead."); + ("Use of tmpnam is deprecated. Use mkstemp instead."); SCM_SYSCALL (rv = tmpnam (name)); if (rv == NULL) |