Initialises unnamed semaphore. The function returns the following error codes:
E_SYSTEM if system call to close semaphore failed.| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(sem_unnamed_type), | intent(inout) | :: | sem |
Semaphore type. |
||
| integer, | intent(in), | optional | :: | value |
Initial value. |