mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-22 04:29:29 +02:00
POpen opened files should not be rewritten
This commit is contained in:
parent
f761b7edbf
commit
d3b493a609
@ -21,7 +21,6 @@ begin
|
||||
close (f);
|
||||
chmod ('test21a',octal (755));
|
||||
popen (f,'./test21a arg1 arg2','W');
|
||||
rewrite (f);
|
||||
if linuxerror<>0 then
|
||||
writeln ('error from POpen : Linuxerror : ', Linuxerror);
|
||||
for i:=1 to 10 do
|
||||
|
Loading…
Reference in New Issue
Block a user