paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-14 10:49:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fix from Marc W.

Browse Source
This commit is contained in:
marco 2004-01-02 22:46:29 +00:00
parent 2514b84ca1
commit 532a14b5e3
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
rtl/linux/unixsysc.inc
View File

@ -86,8 +86,8 @@ begin
{$else} {$else}
assignPipe:=do_SysCall(SysCall_nr_pipe,longint(@pip)); assignPipe:=do_SysCall(SysCall_nr_pipe,longint(@pip));
{$endif} {$endif}
pipe_in:=pip[1]; pipe_in:=pip[0];
pipe_out:=pip[2]; pipe_out:=pip[1];
end; end;
Function PClose(Var F:text) :cint; Function PClose(Var F:text) :cint;
@ -117,7 +117,10 @@ end;
{ {
$Log$ $Log$
Revision 1.24 2003-12-31 20:23:31 marco Revision 1.25 2004-01-02 22:46:29 marco
* fix from Marc W.
Revision 1.24 2003/12/31 20:23:31 marco
* small fixes for exporting statfs(pchar,..) * small fixes for exporting statfs(pchar,..)
Revision 1.23 2003/12/30 15:43:20 marco Revision 1.23 2003/12/30 15:43:20 marco