diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/msdos.c | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/src/msdos.c b/src/msdos.c index 4b7e0e55f07..9a30b379149 100644 --- a/src/msdos.c +++ b/src/msdos.c | |||
| @@ -519,8 +519,11 @@ run_msdos_command (argv, dir, tempin, tempout) | |||
| 519 | /* Build the environment array. */ | 519 | /* Build the environment array. */ |
| 520 | { | 520 | { |
| 521 | extern Lisp_Object Vprocess_environment; | 521 | extern Lisp_Object Vprocess_environment; |
| 522 | Lisp_Object tmp, lst = Vprocess_environment; | 522 | Lisp_Object tmp, lst; |
| 523 | int i, len = XFASTINT (Flength (lst)); | 523 | int i, len; |
| 524 | |||
| 525 | lst = Vprocess_environment; | ||
| 526 | len = XFASTINT (Flength (lst)); | ||
| 524 | 527 | ||
| 525 | envv = alloca ((len + 1) * sizeof (char *)); | 528 | envv = alloca ((len + 1) * sizeof (char *)); |
| 526 | for (i = 0; i < len; i++) | 529 | for (i = 0; i < len; i++) |