fix
This commit is contained in:
parent
95599c0e7c
commit
72769fbef7
@ -403,7 +403,7 @@ begin
|
|||||||
for i:=0 to LL_Size(fileHandles) - 1 do begin
|
for i:=0 to LL_Size(fileHandles) - 1 do begin
|
||||||
elm := LL_Get(fileHandles, i);
|
elm := LL_Get(fileHandles, i);
|
||||||
if stringEquals(PFilehandleEntry(elm)^.filename, Filename) then begin
|
if stringEquals(PFilehandleEntry(elm)^.filename, Filename) then begin
|
||||||
if PFilehandleEntry(elm)^.locked and (not PFilehandleEntry(elm)^.closed) then begin
|
if PFilehandleEntry(elm)^.lock and (not PFilehandleEntry(elm)^.closed) then begin
|
||||||
Error^ := eFileInUse;
|
Error^ := eFileInUse;
|
||||||
exit;
|
exit;
|
||||||
end;
|
end;
|
||||||
@ -413,7 +413,7 @@ begin
|
|||||||
|
|
||||||
//create filehandleentry
|
//create filehandleentry
|
||||||
fileHandleEntree := PFilehandleEntry(kalloc(SizeOf(TFilehandleEntry)));
|
fileHandleEntree := PFilehandleEntry(kalloc(SizeOf(TFilehandleEntry)));
|
||||||
fileHandleEntree.fileName := Filename;
|
fileHandleEntree^.fileName := Filename;
|
||||||
fileHandleEntree^.openMode := OpenMode;
|
fileHandleEntree^.openMode := OpenMode;
|
||||||
fileHandleEntree^.writeMode := WriteMode;
|
fileHandleEntree^.writeMode := WriteMode;
|
||||||
fileHandleEntree^.lock := lock;
|
fileHandleEntree^.lock := lock;
|
||||||
|
Loading…
x
Reference in New Issue
Block a user