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

+ Position is int64

Browse Source 
git-svn-id: trunk@1122 -
This commit is contained in:
michael 2005-09-18 21:38:34 +00:00
parent a3ab2053c9
commit 2c1901aeaa
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
fcl/inc/pipes.pp
View File

@ -30,7 +30,7 @@ Type
TInputPipeStream = Class(THandleStream) TInputPipeStream = Class(THandleStream)
Private Private
FPos : longint; FPos : Int64;
public public
Function Write (Const Buffer; Count : Longint) :Longint; Override; Function Write (Const Buffer; Count : Longint) :Longint; Override;
Function Seek (Offset : Longint;Origin : Word) : longint;override; Function Seek (Offset : Longint;Origin : Word) : longint;override;