Closes named semaphore. On error, the routine sets argument error
to the following error codes:
E_NULL
if semaphore pointer is not associated.E_SYSTEM
if system call to close semaphore failed.Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(sem_named_type), | intent(inout) | :: | sem |
Semaphore type. |
||
integer, | intent(out), | optional | :: | error |
Error code. |