Re: CLIPPER LOCKS

[Sergey Suleymanov <solt@eatpbank.ru>]

>>>>> Anderson Pereira Ataides writes:

 Anderson> Hi, I've got an application develop using Clipper 5.01 and
 Anderson> I'm having trouble with locks.

 Anderson> How can I solve this problem? Is it a dosemu bug?

        Can you try this fix?

diff -rubN dosemu-1.1.3/src/dosext/mfs/mfs.c dosemu-1.1.3.my2/src/dosext/mfs/mfs.c
--- dosemu-1.1.3/src/dosext/mfs/mfs.c	Tue Apr 23 15:16:39 2002
+++ dosemu-1.1.3.my2/src/dosext/mfs/mfs.c	Mon May  6 10:18:53 2002
@@ -3795,6 +3866,7 @@
 		ret = fcntl (fd,F_SETLK,&larg);
 		Debug0((dbg_fd, "lock fd=%x rc=%x type=%x whence=%x start=%lx, len=%lx\n",
 			fd, ret, larg.l_type, larg.l_whence, larg.l_start,larg.l_len));
+		if (ret == -1) SETWORD(&(state->eax), ACCESS_DENIED);
 		return ret != -1 ? TRUE : FALSE;
 	}
     break;

-- 
  Sergey Suleymanov