8.2.23 _gfortran_caf_atomic_op — Атомарная операция

Описание:

Применяет операцию атомарно к атомарной целочисленной или логической переменной. После операции old содержит значение, существовавшее непосредственно перед операцией, которая, соответственно, атомарно добавляет (GFC_CAF_ATOMIC_ADD) value к атомарной целочисленной переменной или выполняет побитовое И, ИЛИ или исключающее ИЛИ между атомарной переменной и value; результат затем сохраняется в атомарной переменной.

Синтаксис:

void _gfortran_caf_atomic_op (int op, caf_token_t token, size_t offset, int image_index, void *value, void *old, int *stat, int type, int kind)

Аргументы:

op	выполняемая операция; возможные значения GFC_CAF_ATOMIC_ADD (1), GFC_CAF_ATOMIC_AND (2), GFC_CAF_ATOMIC_OR (3), GFC_CAF_ATOMIC_XOR (4).
token	intent(in) Непрозрачный указатель, идентифицирующий комассив.
offset	На сколько байт фактические данные сдвинуты относительно базового адреса комассива.
image_index	Идентификатор удаленного изображения; должно быть положительным числом; ноль указывает на текущее изображение при использовании без индексации.
old	intent(out) значение, которое имела атомарная переменная непосредственно перед атомарной операцией.
val	intent(in) Новое значение для атомарной переменной, присваиваемое атомарной переменной, если compare равно значению атомарной переменной.
stat	intent(out) Хранит состояние STAT= и может быть NULL.
type	тип данных, т.е. BT_INTEGER (1) или BT_LOGICAL (2).
kind	Значение kind (только 4; всегда int)