* src/code/run-program.lisp: don't use *active-processes* on Windows

akovalenko · Nov 11, 2011 · a58f059 · a58f059
1 parent e266d2a
commit a58f059
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/code/run-program.lisp b/src/code/run-program.lisp
@@ -859,6 +859,7 @@ Users Manual for details about the PROCESS structure."#-win32"
                                                               :exit-code child)
                                                         (list :%status :running
                                                               :pid child))))
+                                     #-win32
                                      (push proc *active-processes*)))))))
                          ;; Report the error outside the lock.
                          (when (= child -1)