make-temp-file.c (choose_tmpdir): Try standard temp logical on VMS.
* make-temp-file.c (choose_tmpdir): Try standard temp logical on VMS. From-SVN: r150221
This commit is contained in:
parent
95bfca5ed6
commit
2958f4a215
@ -1,3 +1,7 @@
|
||||
2009-07-29 Douglas B Rupp <rupp@gnat.com>
|
||||
|
||||
* make-temp-file.c (choose_tmpdir): Try standard temp logical on VMS.
|
||||
|
||||
2009-07-27 Douglas B Rupp <rupp@gnat.com>
|
||||
|
||||
* pex-unix.c (vfork): Remove VMS specific definition (get from header
|
||||
|
@ -1,5 +1,5 @@
|
||||
/* Utility to pick a temporary filename prefix.
|
||||
Copyright (C) 1996, 1997, 1998, 2001 Free Software Foundation, Inc.
|
||||
Copyright (C) 1996, 1997, 1998, 2001, 2009 Free Software Foundation, Inc.
|
||||
|
||||
This file is part of the libiberty library.
|
||||
Libiberty is free software; you can redistribute it and/or
|
||||
@ -111,9 +111,14 @@ choose_tmpdir (void)
|
||||
char *tmpdir;
|
||||
unsigned int len;
|
||||
|
||||
#ifdef VMS
|
||||
/* Try VMS standard temp logical. */
|
||||
base = try_dir ("/sys$scratch", base);
|
||||
#else
|
||||
base = try_dir (getenv ("TMPDIR"), base);
|
||||
base = try_dir (getenv ("TMP"), base);
|
||||
base = try_dir (getenv ("TEMP"), base);
|
||||
#endif
|
||||
|
||||
#ifdef P_tmpdir
|
||||
base = try_dir (P_tmpdir, base);
|
||||
|
Loading…
Reference in New Issue
Block a user