dm_sem_value Interface

public interface dm_sem_value

Get value of named or unnamed sempahore.


Module Procedures

private function sem_value_named(sem, value) result(rc)

Returns the current semaphore value. Returns E_SYSTEM on error.

Arguments

Type IntentOptional Attributes Name
type(sem_named_type), intent(inout) :: sem

Semaphore type.
integer, intent(out) :: value

Returned value.

Return Value integer

private function sem_value_unnamed(sem, value) result(rc)

Returns the current semaphore value. Returns E_SYSTEM on error.

Arguments

Type IntentOptional Attributes Name
type(sem_unnamed_type), intent(inout), target :: sem

Semaphore type.
integer, intent(out) :: value

Returned value.

Return Value integer