[ruby-dev:12086] Re: [patch] mswin32 system()

わたなべです.

win32/win32.cはsocket周りはPerlからパクったものだけど、
その他のargvあたりはどこから来たのかわからん。
まつもとさんの知りあいの人だっけ？

"U.Nakamura" <[e-mail]> writes:

:というわけで、実験的パッチです。
:ご意見よろしくお願いします。

mingwではsystemが使えなくなりました。

:+    if (!CreateProcess(exec, cmd, NULL, NULL, TRUE, 0, environ, NULL, &si, &pi)) {

execは絶対パスで.exeつきじゃないとまずいですよね？
もしくはNULLとか。
でもNULLにしちゃうと今度は
gcc: installation problem, cannot exec `/usr/lib/gcc-lib/mingw/2.95.2-6/cpp': Permission denied
をもらっちゃうし。うーむ。

:+    if (NtSyncProcess) {
:+	WaitForSingleObject(pi.hProcess, -1);
:+	GetExitCodeProcess(pi.hProcess, &status);
:+	CloseHandle(pi.hProcess);

こうするならstatusはDWORDのほうがいいでしょうね。

-- 
わたなべひろふみ