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. |