| 1234567891011121314151617181920212223242526 |
- (* Release 3.10 *)
- (*-------------------------------------------------------------------------*
- * *
- * LOCKING.DEF - Modula-2 interface to LOCKING.H *
- * *
- * COPYRIGHT (C) 1989..1992 Clarion Software Corporation. *
- * All Rights Reserved *
- * *
- *--------------------------------------------------------------------------*)
- (*# project("#set tsc='on'") *)
- (*# call(o_a_size=>off, o_a_copy=>off, c_conv=>on, result_optional=>on) *)
- (*# module(implementation=>off, init_code=>off) *)
- (*# name(prefix=>c) *)
- DEFINITION MODULE locking;
- CONST
- LK_UNLCK = 0; (* unlock the file region *)
- LK_LOCK = 1; (* lock the file region *)
- LK_NBLCK = 2; (* non-blocking lock *)
- LK_RLCK = 3; (* lock for writing *)
- LK_NBRLCK = 4; (* non-blocking lock for writing *)
- END locking.
|
