9.38 ATOMIC_XOR — Атомарная битовая операция XOR

Описание:

ATOMIC_AND(ATOM, VALUE) атомарно определяет ATOM с побитовым XOR между значениями ATOM и VALUE. Если STAT присутствует и вызов был успешным, ему присваивается значение 0. Если он присутствует и вызов завершился неудачей, ему присваивается положительное значение; в частности, для коиндексированного ATOM, если удалённый образ остановился, ему присваивается значение ISO_FORTRAN_ENV’s STAT_STOPPED_IMAGE , а если удалённый образ завершился неудачей, значение STAT_FAILED_IMAGE.

Стандарт:

TS 18508 или более поздние

Класс:

Атомарная подпрограмма

Синтаксис:

CALL ATOMIC_XOR (ATOM, VALUE [, STAT])

Аргументы:

ATOM	Скалярная комассивная или коиндексированная переменная целочисленного типа с ATOMIC_INT_KIND видом.
VALUE	Скаляр того же типа, что и ATOM. Если вид отличается, значение преобразуется к виду ATOM.
STAT	(необязательно) Скалярная переменная целочисленного типа по умолчанию.

Пример:

program atomic
  use iso_fortran_env
  integer(atomic_int_kind) :: atom[*]
  call atomic_xor (atom[1], int(b'10100011101'))
end program atomic

См. также:

ATOMIC_DEFINE, ATOMIC_FETCH_XOR, ISO_FORTRAN_ENV, ATOMIC_ADD, ATOMIC_OR, ATOMIC_XOR