Fix assertion failure in coerce_unspec_val_to_type

[deliverable/binutils-gdb.git] / readline / util.c

diff --git a/readline/util.c b/readline/util.c
index 321dee23560de88fd4856dcadc76f22e058ec3a2..13bd00c09c9c234f9cb157a3f58830830093c376 100644 (file)
--- a/readline/util.c
+++ b/readline/util.c
@@ -55,6 +55,7 @@
 
 #include "rlprivate.h"
 #include "xmalloc.h"
+#include "rlshell.h"
 
 /* **************************************************************** */
 /*                                                                 */
@@ -507,8 +508,18 @@ _rl_tropen ()
 
   if (_rl_tracefp)
     fclose (_rl_tracefp);
-  sprintf (fnbuf, "/var/tmp/rltrace.%ld", getpid());
-  unlink(fnbuf);
+#if defined (_WIN32) && !defined (__CYGWIN__)
+  /* Windows doesn't have /var/tmp, so open the trace file in the
+     user's temporary directory instead.  */
+  sprintf (fnbuf, "%s/rltrace.%ld",
+          (sh_get_env_value ("TEMP")
+           ? sh_get_env_value ("TEMP")
+           : "."),
+          getpid ());
+#else
+  sprintf (fnbuf, "/var/tmp/rltrace.%ld", (long) getpid ());
+#endif
+  unlink (fnbuf);
   _rl_tracefp = fopen (fnbuf, "w+");
   return _rl_tracefp != 0;
 }