home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / CLIPPER / MISC / TASKING.ZIP / LOCKS.DEF < prev    next >
Encoding:
Modula Definition  |  1985-07-06  |  253 b   |  15 lines
  1. DEFINITION MODULE Locks;
  2.  
  3.   EXPORT QUALIFIED LockType, Lock, BusyLock, Unlock;
  4.  
  5.   TYPE
  6.     LockType;
  7.  
  8.   PROCEDURE Lock(VAR l: LockType);
  9.  
  10.   PROCEDURE BusyLock(VAR l: LockType): BOOLEAN;
  11.  
  12.   PROCEDURE Unlock(VAR l: LockType);
  13.  
  14.   END Locks.
  15.