Searched refs:stat_variable (Results 1 – 2 of 2) sorted by relevance
7 integer :: stat_variable variable13 Unlock(locks(1), stat = stat_variable)15 Unlock(locks(4), stat = stat_variable, ERRMSG = errmsg_variable)
14 stat_variable: critical (STAT=status)15 End critical stat_variable