root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Corretta closefile

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@753 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1994-12-12 16:42:43 +00:00
parent 386624b650
commit e9c4a42f8a
1 changed files with 1 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
include/cfiles.c
View File

@ -173,13 +173,7 @@ Se si utilizza spiegarne dettagliatamente il motivo.
{ {
FileDes wd; FileDes wd;
do CRead(&fdir[dirflg],(RecType) &wd,(long) logicname, NoLock);
{
CRead(&fdir[dirflg],(RecType) &wd,(long) logicname, Lock);
if (TESTLOCK(fdir[dirflg].IOR))
message_box("Sono in attesa della directory n.ro %d", logicname);
}
while TESTLOCK(fdir[dirflg].IOR);
wd.EOD = filed->EOD; wd.EOD = filed->EOD;
wd.Flags = filed->Flags; wd.Flags = filed->Flags;
CWrite(&fdir[dirflg],(RecType) &wd,(long) logicname, UnLock); CWrite(&fdir[dirflg],(RecType) &wd,(long) logicname, UnLock);