<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-15">
<META content="MSHTML 6.00.6000.16674" name=GENERATOR></HEAD>
<BODY style="MARGIN: 4px 4px 1px">
<DIV>Jay:</DIV>
<DIV> </DIV>
<DIV>I haven't studied this code in depth, but on the surface I doubt your change is "correct".  </DIV>
<DIV> </DIV>
<DIV>I think the more telling problem is that if you look at the body of WinTrestle.Release, it is empty, save for a comment that it is not yet implemented.  So, it would seem that if WinTrestle.Acquire is called more than once, you will crash because the locks have not been released.</DIV>
<DIV> </DIV>
<DIV>Further, I don't think it would make sense to release the locks before calling out to Windows, and then reacquire them upon return.  The locks are known to Modula-3 and not Windows.  Releasing them will allow other competing threads to acquire them while you are in the Windows subsystem and would seem to violate whatever protections were in place per holding the locks.  Upon return from Windows, the thread will be back in competition with others to reacquire the locks it gave up and upon success, there is no guarantee that the other threads didn't disturb the state the original thread depended upon.</DIV>
<DIV> </DIV>
<DIV>I would suggest reverting these changes and looking to implement the Release procedure.</DIV>
<DIV> </DIV>
<DIV>Regards,</DIV>
<DIV>Randy</DIV>
<DIV><BR>>>> Jay Krell <jkrell@elego.de> 8/14/2008 4:26 PM >>><BR>CVSROOT:/usr/cvs<BR>Changes by:jkrell@birch.08/08/14 16:26:59<BR><BR>Modified files:<BR>cm3/m3-ui/ui/src/winvbt/: WinTrestle.m3 <BR><BR>Log message:<BR>release locks when calling out to Win32 to prevent recursive lock acquisition. correct?<BR><BR><BR></DIV></BODY></HTML>