1 /* BEGIN INCLUDE FILE...hc_fast_lock.incl.pl1 */
 2 
 3 /* Created November 1984 by Robert Coren to replace hc_lock.incl.pl1 */
 4 
 5 /* Lock format suitable for use with lock$lock_fast, unlock_fast */
 6 
 7 /* format: style3 */
 8 
 9 declare   lock_ptr            pointer;
10 declare   1 hc_fast_lock      aligned based (lock_ptr),
11             2 pid             bit (36) aligned,             /* holder of lock */
12             2 event           bit (36) aligned,             /* event associated with lock */
13             2 flags           aligned,
14               3 notify_sw     bit (1) unaligned,
15               3 pad           bit (35) unaligned;           /* certain locks use this pad, like dirs */
16 
17 /* END INCLUDE FILE...hc_fast_lock.incl.pl1 */