[Chicken-users] process-run return value on windows

[Ashley Bone]

Hi,

It appears that process-run does not return a PID on windows.
The attached patch modifies process-spawn in posixwin.scm so
that it returns the handle from spawnpv.

It is possible that I'm just going crazy, though, because I could
have sworn that I used process-run on windows a few days ago
without any trouble.

ashley

--- posixwin.scm.orig   2005-07-12 05:48:49.000000000 -0500
+++ posixwin.scm        2005-08-07 16:01:49.883948880 -0500
@@ -1286,7 +1286,8 @@
               (##sys#update-errno)
               (when (fx= r -1)
                 (freeargs)
-                (##sys#error 'process-spawn "can not execute process" 
filename) ) ) )
+                (##sys#error 'process-spawn "can not execute process" 
filename) )
+               r))
          (let ([s (car al)])
            (##sys#check-string s 'process-spawn)
            (setarg i s (##sys#size s)) ) ) ) ) ) )