aboutsummaryrefslogtreecommitdiff
path: root/libiberty/pex-unix.c
diff options
context:
space:
mode:
authorDJ Delorie <dj@redhat.com>2006-06-01 14:57:50 +0000
committerDJ Delorie <dj@redhat.com>2006-06-01 14:57:50 +0000
commit014a8caf46e8c0a25de0df38d859652ad6533f04 (patch)
tree445b4ff531f4dc525d54113e70eeb6a748de4df8 /libiberty/pex-unix.c
parent8473f7a446bf3883ec64758583910ab497d4bc10 (diff)
downloadgdb-014a8caf46e8c0a25de0df38d859652ad6533f04.zip
gdb-014a8caf46e8c0a25de0df38d859652ad6533f04.tar.gz
gdb-014a8caf46e8c0a25de0df38d859652ad6533f04.tar.bz2
merge from gcc
Diffstat (limited to 'libiberty/pex-unix.c')
-rw-r--r--libiberty/pex-unix.c14
1 files changed, 11 insertions, 3 deletions
diff --git a/libiberty/pex-unix.c b/libiberty/pex-unix.c
index c92a429..91619af 100644
--- a/libiberty/pex-unix.c
+++ b/libiberty/pex-unix.c
@@ -270,8 +270,8 @@ static void pex_child_error (struct pex_obj *, const char *, const char *, int)
static int pex_unix_open_read (struct pex_obj *, const char *, int);
static int pex_unix_open_write (struct pex_obj *, const char *, int);
static long pex_unix_exec_child (struct pex_obj *, int, const char *,
- char * const *, int, int, int,
- const char **, int *);
+ char * const *, char * const *,
+ int, int, int, const char **, int *);
static int pex_unix_close (struct pex_obj *, int);
static int pex_unix_wait (struct pex_obj *, long, int *, struct pex_time *,
int, const char **, int *);
@@ -352,12 +352,16 @@ pex_child_error (struct pex_obj *obj, const char *executable,
/* Execute a child. */
+extern char **environ;
+
static long
pex_unix_exec_child (struct pex_obj *obj, int flags, const char *executable,
- char * const * argv, int in, int out, int errdes,
+ char * const * argv, char * const * env,
+ int in, int out, int errdes,
const char **errmsg, int *err)
{
pid_t pid;
+
/* We declare these to be volatile to avoid warnings from gcc about
them being clobbered by vfork. */
volatile int sleep_interval;
@@ -409,6 +413,10 @@ pex_unix_exec_child (struct pex_obj *obj, int flags, const char *executable,
if (dup2 (STDOUT_FILE_NO, STDERR_FILE_NO) < 0)
pex_child_error (obj, executable, "dup2", errno);
}
+
+ if (env)
+ environ = env;
+
if ((flags & PEX_SEARCH) != 0)
{
execvp (executable, argv);