forthread_mod Module Reference

Functions/Subroutines
integer function	forthread_init ()
integer function	forthread_destroy ()
integer function	forthread_create (thread_id, attr_id, run, arg)
integer function	forthread_detach (thread_id)
integer function	forthread_equal (t1, t2)
subroutine	forthread_exit (val)
integer function	forthread_join (thread_id, val)
integer function	forthread_cancel (thread_id)
integer function	forthread_kill (thread_id, sig)
integer function	forthread_once_init (once_ctrl_id)
integer function	forthread_once (once_ctrl_id, init_routine)
integer function	forthread_getconcurrency (currlevel)
integer function	forthread_setconcurrency (newlevel)
integer function	forthread_getcpuclockid (thread, clock_id)
integer function	forthread_getschedparam (thread, policy, param)
integer function	forthread_setschedparam (thread, policy, param)
integer function	forthread_setschedprio (thread, prio)
integer function	forthread_setcancelstate (state, oldstate)
integer function	forthread_setcanceltype (ctype, oldctype)
integer function	forthread_key_delete (key_id)
integer function	forthread_key_create (key_id, destructor)
integer function	forthread_mutex_destroy (mutex_id)
integer function	forthread_mutex_init (mutex_id, attr_id)
integer function	forthread_mutex_lock (mutex_id)
integer function	forthread_mutex_trylock (mutex_id)
integer function	forthread_mutex_unlock (mutex_id)
integer function	forthread_mutex_getprioceiling (mutex, prioceiling)
integer function	forthread_mutex_setprioceiling (mutex, prioceiling, old_ceiling)
integer function	forthread_mutex_timedlock (mutex, abs_timeout)
integer function	forthread_cond_destroy (cond_id)
integer function	forthread_cond_init (cond_id, attr_id)
integer function	forthread_cond_timedwait (mutex, abstime)
integer function	forthread_cond_wait (cond_id, mutex_id)
integer function	forthread_cond_broadcast (cond_id)
integer function	forthread_cond_signal (cond_id)
integer function	forthread_barrier_destroy (barrier_id)
integer function	forthread_barrier_init (barrier_id, attr_id, tcount)
integer function	forthread_barrier_wait (barrier_id)
integer function	forthread_spin_destroy (spinlock_id)
integer function	forthread_spin_init (spinlock_id, pshared)
integer function	forthread_spin_lock (lock_id)
integer function	forthread_spin_trylock (lock_id)
integer function	forthread_spin_unlock (lock_id)
integer function	forthread_rwlock_destroy (rwlock_id)
integer function	forthread_rwlock_init (rwlock_id, attr_id)
integer function	forthread_rwlock_rdlock (lock_id)
integer function	forthread_rwlock_tryrdlock (lock_id)
integer function	forthread_rwlock_wrlock (lock_id)
integer function	forthread_rwlock_trywrlock (lock_id)
integer function	forthread_rwlock_unlock (lock_id)
integer function	forthread_rwlock_timedrdlock (lock_id, abs_timeout)
integer function	forthread_rwlock_timedwrlock (lock_id, abs_timeout)
integer function	forthread_attr_destroy (attr)
integer function	forthread_attr_init (attr)
integer function	forthread_attr_getdetachstate (attr, detachstate)
integer function	forthread_attr_setdetachstate (attr, detachstate)
integer function	forthread_attr_getguardsize (attr, guardsize)
integer function	forthread_attr_setguardsize (attr, guardsize)
integer function	forthread_attr_getinheritsched (attr, inheritsched)
integer function	forthread_attr_setinheritsched (attr, inheritsched)
integer function	forthread_attr_getschedparam (attr, param)
integer function	forthread_attr_setschedparam (attr, param)
integer function	forthread_attr_getschedpolicy (attr, policy)
integer function	forthread_attr_setschedpolicy (attr, policy)
integer function	forthread_attr_getscope (attr, scope)
integer function	forthread_attr_setscope (attr, scope)
integer function	forthread_attr_getstacksize (attr, stacksize)
integer function	forthread_attr_setstacksize (attr, stacksize)
integer function	forthread_mutexattr_destroy (attr)
integer function	forthread_mutexattr_init (attr)
integer function	forthread_mutexattr_getpshared (attr, pshared)
integer function	forthread_mutexattr_setpshared (attr, pshared)
integer function	forthread_mutexattr_getprioceiling (attr, prioceiling)
integer function	forthread_mutexattr_setprioceiling (attr, prioceiling)
integer function	forthread_mutexattr_getprotocol (attr, protocol)
integer function	forthread_mutexattr_setprotocol (attr, protocol)
integer function	forthread_mutexattr_gettype (attr, mtype)
integer function	forthread_mutexattr_settype (attr, mtype)
integer function	forthread_condattr_destroy (attr)
integer function	forthread_condattr_init (attr)
integer function	forthread_condattr_getpshared (attr, pshared)
integer function	forthread_condattr_setpshared (attr, pshared)
integer function	forthread_condattr_getclock (attr, clock_id)
integer function	forthread_condattr_setclock (attr, clock_id)
integer function	forthread_barrierattr_destroy (attr)
integer function	forthread_barrierattr_init (attr)
integer function	forthread_barrierattr_getpshared (attr, pshared)
integer function	forthread_barrierattr_setpshared (attr, pshared)
integer function	forthread_rwlockattr_destroy (attr)
integer function	forthread_rwlockattr_init (attr)
integer function	forthread_rwlockattr_getpshared (attr, pshared)
integer function	forthread_rwlockattr_setpshared (attr, pshared)

Function/Subroutine Documentation

forthread_attr_destroy()

integer function forthread_mod::forthread_attr_destroy

(

integer, intent(in)

attr

)

Definition at line 585 of file forthread.F90.

    integer, intent(in) :: attr

    integer :: info

    call thread_attr_destroy(attr,info)
    forthread_attr_destroy=info

forthread_attr_getdetachstate()

integer function forthread_mod::forthread_attr_getdetachstate	(	integer, intent(in)	attr,
		integer, intent(out)	detachstate
	)

Definition at line 603 of file forthread.F90.

    integer, intent(in) :: attr
    integer, intent(out) :: detachstate

    integer  :: info

    call thread_attr_getdetachstate(attr,detachstate,info)
    forthread_attr_getdetachstate=info

forthread_attr_getguardsize()

integer function forthread_mod::forthread_attr_getguardsize	(	integer, intent(in)	attr,
		integer(size_t), intent(out)	guardsize
	)

Definition at line 621 of file forthread.F90.

    integer, intent(in)  :: attr
    integer(size_t), intent(out) :: guardsize

    integer :: info

    call thread_attr_getguardsize(attr,guardsize,info)
    forthread_attr_getguardsize=info

forthread_attr_getinheritsched()

integer function forthread_mod::forthread_attr_getinheritsched	(	integer, intent(in)	attr,
		integer, intent(out)	inheritsched
	)

Definition at line 641 of file forthread.F90.

    integer, intent(in) :: attr
    integer, intent(out) :: inheritsched

    integer :: info

    call thread_attr_getinheritsched(attr,inheritsched,info)
    forthread_attr_getinheritsched=info

forthread_attr_getschedparam()

integer function forthread_mod::forthread_attr_getschedparam	(	integer, intent(in)	attr,
		type(sched_param), intent(out)	param
	)

Definition at line 661 of file forthread.F90.

    integer, intent(in) :: attr
    type(sched_param), intent(out) :: param

    integer :: info

    call thread_attr_getschedparam(attr,param,info)
    forthread_attr_getschedparam=info

forthread_attr_getschedpolicy()

integer function forthread_mod::forthread_attr_getschedpolicy	(	integer, intent(in)	attr,
		integer, intent(out)	policy
	)

Definition at line 681 of file forthread.F90.

    integer, intent(in) :: attr
    integer, intent(out) :: policy

    integer :: info

    call thread_attr_getschedpolicy(attr,policy,info)
    forthread_attr_getschedpolicy=info

forthread_attr_getscope()

integer function forthread_mod::forthread_attr_getscope	(	integer, intent(in)	attr,
		integer, intent(out)	scope
	)

Definition at line 700 of file forthread.F90.

    integer, intent(in) :: attr
    integer, intent(out) :: scope

    integer :: info

    call thread_attr_getscope(attr,scope,info)
    forthread_attr_getscope=info

forthread_attr_getstacksize()

integer function forthread_mod::forthread_attr_getstacksize	(	integer, intent(in)	attr,
		integer(size_t), intent(out)	stacksize
	)

Definition at line 719 of file forthread.F90.

    integer, intent(in) :: attr
    integer(size_t), intent(out) :: stacksize

    integer :: info

    call thread_attr_getstacksize(attr,stacksize,info)
    forthread_attr_getstacksize=info

forthread_attr_init()

integer function forthread_mod::forthread_attr_init

(

integer, intent(in)

attr

)

Definition at line 594 of file forthread.F90.

    integer, intent(in) :: attr

    integer :: info

    call thread_attr_init(attr,info)
    forthread_attr_init=info

forthread_attr_setdetachstate()

integer function forthread_mod::forthread_attr_setdetachstate	(	integer, intent(in)	attr,
		integer, intent(in)	detachstate
	)

Definition at line 613 of file forthread.F90.

    integer, intent(in)  :: attr, detachstate
    integer :: info

    call thread_attr_setdetachstate(attr,detachstate,info)
    forthread_attr_setdetachstate=info

forthread_attr_setguardsize()

integer function forthread_mod::forthread_attr_setguardsize	(	integer, intent(in)	attr,
		integer(size_t), intent(in)	guardsize
	)

Definition at line 631 of file forthread.F90.

    integer, intent(in) :: attr
    integer(size_t), intent(in) :: guardsize

    integer :: info

    call thread_attr_setguardsize(attr,guardsize,info)
    forthread_attr_setguardsize=info

forthread_attr_setinheritsched()

integer function forthread_mod::forthread_attr_setinheritsched	(	integer, intent(in)	attr,
		integer, intent(in)	inheritsched
	)

Definition at line 651 of file forthread.F90.

    integer, intent(in) :: attr
    integer, intent(in) :: inheritsched

    integer :: info

    call thread_attr_setinheritsched(attr,inheritsched,info)
    forthread_attr_setinheritsched=info

forthread_attr_setschedparam()

integer function forthread_mod::forthread_attr_setschedparam	(	integer, intent(in)	attr,
		type(sched_param), intent(in)	param
	)

Definition at line 671 of file forthread.F90.

    integer, intent(in) :: attr
    type(sched_param), intent(in) :: param

    integer :: info

    call thread_attr_setschedparam(attr,param,info)
    forthread_attr_setschedparam=info

forthread_attr_setschedpolicy()

integer function forthread_mod::forthread_attr_setschedpolicy	(	integer, intent(in)	attr,
		integer, intent(in)	policy
	)

Definition at line 691 of file forthread.F90.

    integer, intent(in) :: attr, policy

    integer :: info

    call thread_attr_setschedpolicy(attr,policy,info)
    forthread_attr_setschedpolicy=info

forthread_attr_setscope()

integer function forthread_mod::forthread_attr_setscope	(	integer, intent(in)	attr,
		integer, intent(in)	scope
	)

Definition at line 710 of file forthread.F90.

    integer, intent(in) :: attr, scope

    integer :: info

    call thread_attr_setscope(attr,scope,info)
    forthread_attr_setscope=info

forthread_attr_setstacksize()

integer function forthread_mod::forthread_attr_setstacksize	(	integer, intent(in)	attr,
		integer(size_t), intent(in)	stacksize
	)

Definition at line 729 of file forthread.F90.

    integer, intent(in) :: attr
    integer(size_t), intent(in) :: stacksize

    integer :: info

    call thread_attr_setstacksize(attr,stacksize,info)
    forthread_attr_setstacksize=info

forthread_barrier_destroy()

integer function forthread_mod::forthread_barrier_destroy

(

integer, intent(in)

barrier_id

)

Definition at line 408 of file forthread.F90.

    integer, intent(in) :: barrier_id

    integer :: info

    call thread_barrier_destroy(barrier_id,info)
    forthread_barrier_destroy=info

forthread_barrier_init()

integer function forthread_mod::forthread_barrier_init	(	integer, intent(out)	barrier_id,
		integer, intent(in)	attr_id,
		integer, intent(in)	tcount
	)

Definition at line 417 of file forthread.F90.

    integer, intent(out) :: barrier_id
    integer, intent(in) :: attr_id, tcount

    integer :: info

    call thread_barrier_init(barrier_id,attr_id,tcount,info)
    forthread_barrier_init=info

forthread_barrier_wait()

integer function forthread_mod::forthread_barrier_wait

(

integer, intent(in)

barrier_id

)

Definition at line 427 of file forthread.F90.

    integer, intent(in) :: barrier_id

    integer :: info

    call thread_barrier_wait(barrier_id,info)
    forthread_barrier_wait=info

forthread_barrierattr_destroy()

integer function forthread_mod::forthread_barrierattr_destroy

(

integer, intent(in)

attr

)

Definition at line 903 of file forthread.F90.

    integer, intent(in) :: attr

    integer :: info

    call thread_barrierattr_destroy(attr,info)
    forthread_barrierattr_destroy=info

forthread_barrierattr_getpshared()

integer function forthread_mod::forthread_barrierattr_getpshared	(	integer, intent(in)	attr,
		integer, intent(out)	pshared
	)

Definition at line 921 of file forthread.F90.

    integer, intent(in) :: attr
    integer, intent(out) :: pshared

    integer :: info

    call thread_barrierattr_getpshared(attr,pshared,info)
    forthread_barrierattr_getpshared=info

forthread_barrierattr_init()

integer function forthread_mod::forthread_barrierattr_init

(

integer, intent(in)

attr

)

Definition at line 912 of file forthread.F90.

    integer, intent(in) :: attr

    integer :: info

    call thread_barrierattr_init(attr,info)
    forthread_barrierattr_init=info

forthread_barrierattr_setpshared()

integer function forthread_mod::forthread_barrierattr_setpshared	(	integer, intent(in)	attr,
		integer, intent(in)	pshared
	)

Definition at line 931 of file forthread.F90.

    integer, intent(in) :: attr, pshared
    integer :: info

    call thread_barrierattr_setpshared(attr,pshared,info)
    forthread_barrierattr_setpshared=info

forthread_cancel()

integer function forthread_mod::forthread_cancel

(

integer, intent(in)

thread_id

)

Definition at line 105 of file forthread.F90.

    integer, intent(in) :: thread_id

    integer :: info

    call thread_cancel(thread_id,info)
    forthread_cancel=info

forthread_cond_broadcast()

integer function forthread_mod::forthread_cond_broadcast

(

integer, intent(in)

cond_id

)

Definition at line 385 of file forthread.F90.

    integer, intent(in) :: cond_id

    integer :: info

    call thread_cond_broadcast(cond_id,info)
    forthread_cond_broadcast=info

forthread_cond_destroy()

integer function forthread_mod::forthread_cond_destroy

(

integer, intent(in)

cond_id

)

Definition at line 347 of file forthread.F90.

    integer, intent(in) :: cond_id

    integer :: info

    call thread_cond_destroy(cond_id,info)
    forthread_cond_destroy=info

Here is the caller graph for this function:

forthread_cond_init()

integer function forthread_mod::forthread_cond_init	(	integer, intent(out)	cond_id,
		integer, intent(in)	attr_id
	)

Definition at line 356 of file forthread.F90.

    integer, intent(out) :: cond_id
    integer, intent(in) :: attr_id

    integer :: info

    call thread_cond_init(cond_id,attr_id,info)
    forthread_cond_init=info

Here is the caller graph for this function:

forthread_cond_signal()

integer function forthread_mod::forthread_cond_signal

(

integer, intent(in)

cond_id

)

Definition at line 394 of file forthread.F90.

    integer, intent(in) :: cond_id

    integer :: info

    call thread_cond_signal(cond_id,info)
    forthread_cond_signal=info

Here is the caller graph for this function:

forthread_cond_timedwait()

integer function forthread_mod::forthread_cond_timedwait	(	integer, intent(in)	mutex,
		type(timespec), intent(in)	abstime
	)

Definition at line 366 of file forthread.F90.

    integer, intent(in) :: mutex
    type(timespec), intent(in) :: abstime

    integer :: info

    call thread_cond_timedwait(mutex,abstime,info)
    forthread_cond_timedwait=info

forthread_cond_wait()

integer function forthread_mod::forthread_cond_wait	(	integer, intent(in)	cond_id,
		integer, intent(in)	mutex_id
	)

Definition at line 376 of file forthread.F90.

    integer, intent(in) :: cond_id, mutex_id

    integer :: info

    call thread_cond_wait(cond_id,mutex_id,info)
    forthread_cond_wait=info

Here is the caller graph for this function:

forthread_condattr_destroy()

integer function forthread_mod::forthread_condattr_destroy

(

integer, intent(in)

attr

)

Definition at line 841 of file forthread.F90.

    integer, intent(in) :: attr

    integer :: info

    call thread_condattr_destroy(attr,info)
    forthread_condattr_destroy=info

forthread_condattr_getclock()

integer function forthread_mod::forthread_condattr_getclock	(	integer, intent(in)	attr,
		integer, intent(out)	clock_id
	)

Definition at line 879 of file forthread.F90.

    integer, intent(in) :: attr
    integer, intent(out) :: clock_id

    integer :: info

    call thread_condattr_getclock(attr,clock_id,info)
    forthread_condattr_getclock=info

forthread_condattr_getpshared()

integer function forthread_mod::forthread_condattr_getpshared	(	integer, intent(in)	attr,
		integer, intent(out)	pshared
	)

Definition at line 859 of file forthread.F90.

    integer, intent(in) :: attr
    integer, intent(out) :: pshared

    integer :: info

    call thread_condattr_getpshared(attr,pshared,info)
    forthread_condattr_getpshared=info

forthread_condattr_init()

integer function forthread_mod::forthread_condattr_init

(

integer, intent(in)

attr

)

Definition at line 850 of file forthread.F90.

    integer, intent(in) :: attr

    integer :: info

    call thread_condattr_init(attr,info)
    forthread_condattr_init=info

forthread_condattr_setclock()

integer function forthread_mod::forthread_condattr_setclock	(	integer, intent(in)	attr,
		integer, intent(in)	clock_id
	)

Definition at line 889 of file forthread.F90.

    integer, intent(in) :: attr
    integer, intent(in) :: clock_id

    integer :: info

    call thread_condattr_setclock(attr,clock_id,info)
    forthread_condattr_setclock=info

forthread_condattr_setpshared()

integer function forthread_mod::forthread_condattr_setpshared	(	integer, intent(in)	attr,
		integer, intent(in)	pshared
	)

Definition at line 869 of file forthread.F90.

    integer, intent(in) :: attr, pshared

    integer :: info

    call thread_condattr_setpshared(attr,pshared,info)
    forthread_condattr_setpshared=info

forthread_create()

integer function forthread_mod::forthread_create	(	integer, intent(out)	thread_id,
		integer, intent(in)	attr_id,
		procedure(i_run)	run,
		integer, target	arg
	)

Definition at line 33 of file forthread.F90.

    integer, intent(out) :: thread_id
    integer, intent(in) :: attr_id
    procedure(i_run) :: run !type i_run
    integer, target  :: arg

    integer :: i, info
    procedure(i_start_routine), bind(c), pointer :: start_routinep
    type(ptr_t_run), dimension(:), pointer       :: tmp
    type(t_run), pointer :: runp
    call thread_mutex_lock(routine_table_mutex,info)

    call thread_alloc(thread_id,info)
    if (thread_id.gt.routine_table_size) then
      nullify(tmp)
      allocate(tmp(routine_table_size*2))
      do i=1,routine_table_size
        tmp(i) = routine_table(i)
      enddo
      deallocate(routine_table)
      routine_table => tmp
      routine_table_size = routine_table_size*2
    endif
    allocate(routine_table(thread_id)%t)
    routine_table(thread_id)%t%run => run
    routine_table(thread_id)%t%arg => arg
    start_routinep => start_routine

    call thread_create(thread_id,attr_id,c_funloc(start_routinep),&
         c_loc(routine_table(thread_id)%t),info)

    call thread_mutex_unlock(routine_table_mutex,info)
    forthread_create=info

Here is the call graph for this function:

Here is the caller graph for this function:

forthread_destroy()

integer function forthread_mod::forthread_destroy

(

)

Definition at line 23 of file forthread.F90.

    integer :: info

    deallocate(routine_table)
    routine_table_size = 0
    call thread_mutex_destroy(routine_table_mutex,info)
    call thread_destroy(info)
    forthread_destroy=info

Here is the caller graph for this function:

forthread_detach()

integer function forthread_mod::forthread_detach

(

integer, intent(in)

thread_id

)

Definition at line 68 of file forthread.F90.

    integer, intent(in) :: thread_id

    integer :: info

    call thread_detach(thread_id,info)
    forthread_detach=info

forthread_equal()

integer function forthread_mod::forthread_equal	(	integer, intent(in)	t1,
		integer, intent(in)	t2
	)

Definition at line 77 of file forthread.F90.

    integer, intent(in) :: t1, t2

    integer :: info

    call thread_equal(t1,t2,info)
    forthread_equal=info

forthread_exit()

subroutine forthread_mod::forthread_exit

(

integer, pointer

val

)

Definition at line 87 of file forthread.F90.

    integer, pointer :: val

    call thread_exit(c_loc(val))

forthread_getconcurrency()

integer function forthread_mod::forthread_getconcurrency

(

integer, intent(out)

currlevel

)

Definition at line 146 of file forthread.F90.

    integer, intent(out) :: currlevel

    integer :: info

    call thread_getconcurrency(currlevel,info)
    forthread_getconcurrency=info

forthread_getcpuclockid()

integer function forthread_mod::forthread_getcpuclockid	(	integer, intent(in)	thread,
		integer, intent(out)	clock_id
	)

Definition at line 165 of file forthread.F90.

    integer, intent(in) :: thread
    integer, intent(out) :: clock_id

    integer :: info

    call thread_getcpuclockid(thread,clock_id,info)
    forthread_getcpuclockid=info

forthread_getschedparam()

integer function forthread_mod::forthread_getschedparam	(	integer, intent(in)	thread,
		integer, intent(out)	policy,
		type(sched_param), intent(out)	param
	)

Definition at line 176 of file forthread.F90.

    integer, intent(in) :: thread
    integer, intent(out) :: policy
    type(sched_param), intent(out) :: param

    integer :: info

    call thread_getschedparam(thread,policy,param,info)
    forthread_getschedparam=info

forthread_init()

integer function forthread_mod::forthread_init

(

)

Definition at line 11 of file forthread.F90.

    integer :: info

    allocate(routine_table(init_size))
    routine_table_size = init_size

    call thread_init(info)

    call thread_mutex_init(routine_table_mutex,-1,info)
    forthread_init=info

Here is the caller graph for this function:

forthread_join()

integer function forthread_mod::forthread_join	(	integer, intent(in)	thread_id,
		integer, pointer	val
	)

Definition at line 93 of file forthread.F90.

    integer, intent(in) :: thread_id
    integer, pointer:: val

    integer :: info

    type(c_ptr)                 :: value_ptr
    call thread_join(thread_id,value_ptr,info)
    call c_f_pointer(value_ptr,val)
    forthread_join=info

Here is the caller graph for this function:

forthread_key_create()

integer function forthread_mod::forthread_key_create	(	integer, intent(out)	key_id,
		procedure(i_destructor)	destructor
	)

Definition at line 241 of file forthread.F90.

    integer, intent(out) :: key_id
    procedure(i_destructor) :: destructor
    ! dangerous but works! (gfortran)
    ! TODO test in other compilers

    integer :: info

    call thread_key_create(key_id,c_funloc(destructor),info)
    forthread_key_create=info

forthread_key_delete()

integer function forthread_mod::forthread_key_delete

(

integer, intent(in)

key_id

)

Definition at line 232 of file forthread.F90.

    integer, intent(in) :: key_id

    integer :: info

    call thread_key_delete(key_id,info)
    forthread_key_delete=info

forthread_kill()

integer function forthread_mod::forthread_kill	(	integer, intent(in)	thread_id,
		integer, intent(in)	sig
	)

Definition at line 114 of file forthread.F90.

    integer, intent(in) :: thread_id, sig

    integer :: info

    call thread_kill(thread_id,sig,info)
    forthread_kill=info

forthread_mutex_destroy()

integer function forthread_mod::forthread_mutex_destroy

(

integer, intent(in)

mutex_id

)

Definition at line 265 of file forthread.F90.

    integer, intent(in) :: mutex_id

    integer :: info

    call thread_mutex_destroy(mutex_id,info)
    forthread_mutex_destroy=info

Here is the caller graph for this function:

forthread_mutex_getprioceiling()

integer function forthread_mod::forthread_mutex_getprioceiling	(	integer, intent(in)	mutex,
		integer, intent(out)	prioceiling
	)

Definition at line 311 of file forthread.F90.

    integer, intent(in) :: mutex
    integer, intent(out) :: prioceiling

    integer :: info

    call thread_mutex_getprioceiling(mutex,prioceiling,info)
    forthread_mutex_getprioceiling=info

forthread_mutex_init()

integer function forthread_mod::forthread_mutex_init	(	integer, intent(out)	mutex_id,
		integer, intent(in)	attr_id
	)

Definition at line 274 of file forthread.F90.

    integer, intent(out) :: mutex_id
    integer, intent(in) :: attr_id

    integer :: info

    call thread_mutex_init(mutex_id,attr_id,info)
    forthread_mutex_init=info

Here is the caller graph for this function:

forthread_mutex_lock()

integer function forthread_mod::forthread_mutex_lock

(

integer, intent(in)

mutex_id

)

Definition at line 284 of file forthread.F90.

    integer, intent(in) :: mutex_id

    integer :: info

    call thread_mutex_lock(mutex_id,info)
    forthread_mutex_lock=info

Here is the caller graph for this function:

forthread_mutex_setprioceiling()

integer function forthread_mod::forthread_mutex_setprioceiling	(	integer, intent(in)	mutex,
		integer, intent(in)	prioceiling,
		integer, intent(out)	old_ceiling
	)

Definition at line 321 of file forthread.F90.

    integer, intent(in) :: mutex, prioceiling
    integer, intent(out) :: old_ceiling

    integer :: info

    call thread_mutex_setprioceiling(mutex,prioceiling,old_ceiling,info)
    forthread_mutex_setprioceiling=info

forthread_mutex_timedlock()

integer function forthread_mod::forthread_mutex_timedlock	(	integer, intent(in)	mutex,
		type(timespec), intent(in)	abs_timeout
	)

Definition at line 332 of file forthread.F90.

    integer,        intent(in) :: mutex
    type(timespec), intent(in) :: abs_timeout

    integer :: info

    call thread_mutex_timedlock(mutex,abs_timeout,info)
    forthread_mutex_timedlock=info

forthread_mutex_trylock()

integer function forthread_mod::forthread_mutex_trylock

(

integer, intent(in)

mutex_id

)

Definition at line 293 of file forthread.F90.

    integer, intent(in) :: mutex_id

    integer :: info

    call thread_mutex_trylock(mutex_id,info)
    forthread_mutex_trylock=info

Here is the caller graph for this function:

forthread_mutex_unlock()

integer function forthread_mod::forthread_mutex_unlock

(

integer, intent(in)

mutex_id

)

Definition at line 302 of file forthread.F90.

    integer, intent(in) :: mutex_id

    integer :: info

    call thread_mutex_unlock(mutex_id,info)
    forthread_mutex_unlock=info

Here is the caller graph for this function:

forthread_mutexattr_destroy()

integer function forthread_mod::forthread_mutexattr_destroy

(

integer, intent(in)

attr

)

Definition at line 743 of file forthread.F90.

    integer, intent(in) :: attr

    integer :: info

    call thread_mutexattr_destroy(attr,info)
    forthread_mutexattr_destroy=info

forthread_mutexattr_getprioceiling()

integer function forthread_mod::forthread_mutexattr_getprioceiling	(	integer, intent(in)	attr,
		integer, intent(out)	prioceiling
	)

Definition at line 780 of file forthread.F90.

    integer, intent(in) :: attr
    integer, intent(out) :: prioceiling

    integer :: info

    call thread_mutexattr_getprioceiling(attr,prioceiling,info)
    forthread_mutexattr_getprioceiling=info

forthread_mutexattr_getprotocol()

integer function forthread_mod::forthread_mutexattr_getprotocol	(	integer, intent(in)	attr,
		integer, intent(out)	protocol
	)

Definition at line 799 of file forthread.F90.

    integer, intent(in) :: attr
    integer, intent(out) :: protocol

    integer :: info

    call thread_mutexattr_getprotocol(attr,protocol,info)
    forthread_mutexattr_getprotocol=info

forthread_mutexattr_getpshared()

integer function forthread_mod::forthread_mutexattr_getpshared	(	integer, intent(in)	attr,
		integer, intent(out)	pshared
	)

Definition at line 761 of file forthread.F90.

    integer, intent(in) :: attr
    integer, intent(out) :: pshared

    integer :: info

    call thread_mutexattr_getpshared(attr,pshared,info)
    forthread_mutexattr_getpshared=info

forthread_mutexattr_gettype()

integer function forthread_mod::forthread_mutexattr_gettype	(	integer, intent(in)	attr,
		integer, intent(out)	mtype
	)

Definition at line 818 of file forthread.F90.

    integer, intent(in) :: attr
    integer, intent(out) :: mtype

    integer :: info

    call thread_mutexattr_gettype(attr,mtype,info)
    forthread_mutexattr_gettype=info

forthread_mutexattr_init()

integer function forthread_mod::forthread_mutexattr_init

(

integer, intent(in)

attr

)

Definition at line 752 of file forthread.F90.

    integer, intent(in) :: attr

    integer :: info

    call thread_mutexattr_init(attr,info)
    forthread_mutexattr_init=info

forthread_mutexattr_setprioceiling()

integer function forthread_mod::forthread_mutexattr_setprioceiling	(	integer, intent(in)	attr,
		integer, intent(in)	prioceiling
	)

Definition at line 790 of file forthread.F90.

    integer, intent(in) :: attr, prioceiling

    integer :: info

    call thread_mutexattr_setprioceiling(attr,prioceiling,info)
    forthread_mutexattr_setprioceiling=info

forthread_mutexattr_setprotocol()

integer function forthread_mod::forthread_mutexattr_setprotocol	(	integer, intent(in)	attr,
		integer, intent(in)	protocol
	)

Definition at line 809 of file forthread.F90.

    integer, intent(in) :: attr, protocol

    integer :: info

    call thread_mutexattr_setprotocol(attr,protocol,info)
    forthread_mutexattr_setprotocol=info

forthread_mutexattr_setpshared()

integer function forthread_mod::forthread_mutexattr_setpshared	(	integer, intent(in)	attr,
		integer, intent(in)	pshared
	)

Definition at line 771 of file forthread.F90.

    integer       , intent(in)      :: attr
    integer       , intent(in)      :: pshared
    integer           :: info

    call thread_mutexattr_setpshared(attr,pshared,info)
    forthread_mutexattr_setpshared=info

forthread_mutexattr_settype()

integer function forthread_mod::forthread_mutexattr_settype	(	integer, intent(in)	attr,
		integer, intent(in)	mtype
	)

Definition at line 828 of file forthread.F90.

    integer, intent(in) :: attr, mtype

    integer :: info

    call thread_mutexattr_settype(attr,mtype,info)
    forthread_mutexattr_settype=info

forthread_once()

integer function forthread_mod::forthread_once	(	integer, intent(in)	once_ctrl_id,
		procedure(i_once)	init_routine
	)

Definition at line 132 of file forthread.F90.

    integer, intent(in) :: once_ctrl_id
    procedure(i_once) :: init_routine
    ! dangerous but works! (gfortran)
    ! TODO test in other compilers

    integer :: info

    call thread_once(once_ctrl_id,c_funloc(init_routine),info)
    forthread_once=info

forthread_once_init()

integer function forthread_mod::forthread_once_init

(

integer, intent(out)

once_ctrl_id

)

Definition at line 123 of file forthread.F90.

    integer, intent(out) :: once_ctrl_id

    integer :: info

    call thread_once_init(once_ctrl_id,info)
    forthread_once_init=info

forthread_rwlock_destroy()

integer function forthread_mod::forthread_rwlock_destroy

(

integer, intent(in)

rwlock_id

)

Definition at line 495 of file forthread.F90.

    integer, intent(in) :: rwlock_id

    integer :: info

    call thread_rwlock_destroy(rwlock_id,info)
    forthread_rwlock_destroy=info

Here is the caller graph for this function:

forthread_rwlock_init()

integer function forthread_mod::forthread_rwlock_init	(	integer, intent(out)	rwlock_id,
		integer, intent(in)	attr_id
	)

Definition at line 504 of file forthread.F90.

    integer, intent(out) :: rwlock_id
    integer, intent(in) :: attr_id

    integer :: info

    call thread_rwlock_init(rwlock_id,attr_id,info)
    forthread_rwlock_init=info

Here is the caller graph for this function:

forthread_rwlock_rdlock()

integer function forthread_mod::forthread_rwlock_rdlock

(

integer, intent(in)

lock_id

)

Definition at line 514 of file forthread.F90.

    integer, intent(in) :: lock_id

    integer :: info

    call thread_rwlock_rdlock(lock_id,info)
    forthread_rwlock_rdlock=info

Here is the caller graph for this function:

forthread_rwlock_timedrdlock()

integer function forthread_mod::forthread_rwlock_timedrdlock	(	integer, intent(in)	lock_id,
		type(timespec), intent(in)	abs_timeout
	)

Definition at line 560 of file forthread.F90.

    integer, intent(in) :: lock_id
    type(timespec), intent(in) :: abs_timeout

    integer :: info

    call thread_rwlock_timedrdlock(lock_id,abs_timeout,info)
    forthread_rwlock_timedrdlock=info

forthread_rwlock_timedwrlock()

integer function forthread_mod::forthread_rwlock_timedwrlock	(	integer, intent(in)	lock_id,
		type(timespec), intent(in)	abs_timeout
	)

Definition at line 570 of file forthread.F90.

    integer, intent(in) :: lock_id
    type(timespec), intent(in) :: abs_timeout

    integer :: info

    call thread_rwlock_timedwrlock(lock_id,abs_timeout,info)
    forthread_rwlock_timedwrlock=info

forthread_rwlock_tryrdlock()

integer function forthread_mod::forthread_rwlock_tryrdlock

(

integer, intent(in)

lock_id

)

Definition at line 523 of file forthread.F90.

    integer, intent(in) :: lock_id

    integer :: info

    call thread_rwlock_tryrdlock(lock_id,info)
    forthread_rwlock_tryrdlock=info

forthread_rwlock_trywrlock()

integer function forthread_mod::forthread_rwlock_trywrlock

(

integer, intent(in)

lock_id

)

Definition at line 541 of file forthread.F90.

    integer, intent(in) :: lock_id

    integer :: info

    call thread_rwlock_trywrlock(lock_id,info)
    forthread_rwlock_trywrlock=info

forthread_rwlock_unlock()

integer function forthread_mod::forthread_rwlock_unlock

(

integer, intent(in)

lock_id

)

Definition at line 550 of file forthread.F90.

    integer, intent(in) :: lock_id

    integer  :: info

    call thread_rwlock_unlock(lock_id,info)
    forthread_rwlock_unlock=info

Here is the caller graph for this function:

forthread_rwlock_wrlock()

integer function forthread_mod::forthread_rwlock_wrlock

(

integer, intent(in)

lock_id

)

Definition at line 532 of file forthread.F90.

    integer, intent(in) :: lock_id

    integer :: info

    call thread_rwlock_wrlock(lock_id,info)
    forthread_rwlock_wrlock=info

Here is the caller graph for this function:

forthread_rwlockattr_destroy()

integer function forthread_mod::forthread_rwlockattr_destroy

(

integer, intent(in)

attr

)

Definition at line 944 of file forthread.F90.

    integer, intent(in) :: attr
    integer :: info

    call thread_rwlockattr_destroy(attr,info)
    forthread_rwlockattr_destroy=info

forthread_rwlockattr_getpshared()

integer function forthread_mod::forthread_rwlockattr_getpshared	(	integer, intent(in)	attr,
		integer, intent(out)	pshared
	)

Definition at line 960 of file forthread.F90.

    integer, intent(in) :: attr
    integer, intent(out) :: pshared
    integer :: info

    call thread_rwlockattr_getpshared(attr,pshared,info)
    forthread_rwlockattr_getpshared=info

forthread_rwlockattr_init()

integer function forthread_mod::forthread_rwlockattr_init

(

integer, intent(in)

attr

)

Definition at line 952 of file forthread.F90.

    integer, intent(in) :: attr
    integer :: info

    call thread_rwlockattr_init(attr,info)
    forthread_rwlockattr_init=info

forthread_rwlockattr_setpshared()

integer function forthread_mod::forthread_rwlockattr_setpshared	(	integer, intent(in)	attr,
		integer, intent(in)	pshared
	)

Definition at line 969 of file forthread.F90.

    integer, intent(in) :: attr, pshared
    integer :: info

    call thread_rwlockattr_setpshared(attr,pshared,info)
    forthread_rwlockattr_setpshared=info

forthread_setcancelstate()

integer function forthread_mod::forthread_setcancelstate	(	integer, intent(in)	state,
		integer, intent(out)	oldstate
	)

Definition at line 208 of file forthread.F90.

    integer, intent(in) :: state
    integer, intent(out) :: oldstate

    integer :: info

    call thread_setcancelstate(state,oldstate,info)
    forthread_setcancelstate=info

forthread_setcanceltype()

integer function forthread_mod::forthread_setcanceltype	(	integer, intent(in)	ctype,
		integer, intent(out)	oldctype
	)

Definition at line 218 of file forthread.F90.

    integer, intent(in) :: ctype
    integer, intent(out) :: oldctype

    integer :: info

    call thread_setcanceltype(ctype,oldctype,info)
    forthread_setcanceltype=info

forthread_setconcurrency()

integer function forthread_mod::forthread_setconcurrency

(

integer, intent(in)

newlevel

)

Definition at line 155 of file forthread.F90.

    integer, intent(in) :: newlevel

    integer :: info

    call thread_setconcurrency(newlevel,info)
    forthread_setconcurrency=info

forthread_setschedparam()

integer function forthread_mod::forthread_setschedparam	(	integer, intent(in)	thread,
		integer, intent(in)	policy,
		type(sched_param), intent(in)	param
	)

Definition at line 187 of file forthread.F90.

    integer, intent(in) :: thread, policy
    type(sched_param), intent(in) :: param

    integer :: info

    call thread_setschedparam(thread,policy,param,info)
    forthread_setschedparam=info

forthread_setschedprio()

integer function forthread_mod::forthread_setschedprio	(	integer, intent(in)	thread,
		integer, intent(in)	prio
	)

Definition at line 198 of file forthread.F90.

    integer, intent(in) :: thread, prio

    integer :: info

    call thread_setschedprio(thread,prio,info)
    forthread_setschedprio=info

forthread_spin_destroy()

integer function forthread_mod::forthread_spin_destroy

(

integer, intent(in)

spinlock_id

)

Definition at line 442 of file forthread.F90.

    integer, intent(in) :: spinlock_id

    integer :: info

    call thread_spin_destroy(spinlock_id,info)
    forthread_spin_destroy=info

forthread_spin_init()

integer function forthread_mod::forthread_spin_init	(	integer, intent(out)	spinlock_id,
		integer, intent(in)	pshared
	)

Definition at line 451 of file forthread.F90.

    integer, intent(out) :: spinlock_id
    integer, intent(in) :: pshared

    integer :: info

    call thread_spin_init(spinlock_id,pshared,info)
    forthread_spin_init=info

forthread_spin_lock()

integer function forthread_mod::forthread_spin_lock

(

integer, intent(in)

lock_id

)

Definition at line 461 of file forthread.F90.

    integer, intent(in) :: lock_id

    integer :: info

    call thread_spin_lock(lock_id,info)
    forthread_spin_lock=info

forthread_spin_trylock()

integer function forthread_mod::forthread_spin_trylock

(

integer, intent(in)

lock_id

)

Definition at line 470 of file forthread.F90.

    integer, intent(in) :: lock_id

    integer :: info

    call thread_spin_trylock(lock_id,info)
    forthread_spin_trylock=info

forthread_spin_unlock()

integer function forthread_mod::forthread_spin_unlock

(

integer, intent(in)

lock_id

)

Definition at line 479 of file forthread.F90.

    integer, intent(in) :: lock_id

    integer :: info

    call thread_spin_unlock(lock_id,info)
    forthread_spin_unlock=info