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

* make handle for DosCalls accessible for other code

Browse Source 
git-svn-id: trunk@28889 -
This commit is contained in:
Tomas Hajny 2014-10-21 16:37:31 +00:00
parent 1d0de6f87c
commit feb58d5d25
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
rtl/os2/system.pas
View File

@ -142,7 +142,7 @@ const
Sys_DosOpenL: TDosOpenL = @DummyDosOpenL;
Sys_DosSetFilePtrL: TDosSetFilePtrL = @DummyDosSetFilePtrL;
Sys_DosSetFileSizeL: TDosSetFileSizeL = @DummyDosSetFileSizeL;
DosCallsHandle: THandle = THandle (-1);
implementation
@ -1085,7 +1085,6 @@ var TIB: PThreadInfoBlock;
RC: cardinal;
ErrStr: string;
P: pointer;
DosCallsHandle: THandle;
DW: cardinal;
const