Changeset 15009

Timestamp:

Oct 3, 2011, 11:38:18 AM (13 years ago)

Author:

R. Matthew Emerson

Message:

Make ccl:external-process-error-stream available on Windows.

Fixes ticket:884.

File:

• trunk/source/level-1/linux-files.lisp (modified) (2 diffs)

trunk/source/level-1/linux-files.lisp

@@ -1514 +1514 @@
                          (when (zerop (car (external-process-token proc)))
                            t))))))
-
-
-
-
-
-  (defun external-process-error-stream (proc)
-    "Return the stream which is used to read error output from a given OS
-subprocess, if it has one."
-    (require-type proc 'external-process)
-    (external-process-error proc))
-
-
   
   (defun signal-external-process (proc signal)
@@ -1944 +1932 @@
   (external-process-output proc))
 
+(defun external-process-error-stream (proc)
+  "Return the stream which is used to read error output from a given OS
+subprocess, if it has one."
+  (require-type proc 'external-process)
+  (external-process-error proc))
 
 (defun external-process-id (proc)