On 17 October 2003, Frank wrote:
[...]
program Bar;
uses GPC, Pipe;
var Arguments: array [0 .. 2] of CString = ('foo', 'bar', '"bar"'); Status: Integer = 0; ErrMsg: TString = '';
begin PWait (PExecute ('foo', PCStrings (@Arguments), ErrMsg, PExecute_One), Status, 0); WriteLn (Status, ' ', ErrMsg) end.
The output should be:
bar "bar" 0
I have just discovered that there is a problem under Mingw as well. I compiled and ran the programs under Mingw, and the output was this:
bar "bar 0
Best regards, The Chief --------- Prof. Abimbola Olowofoyeku (The African Chief) Web: http://www.bigfoot.com/~african_chief/