8.33 ATOMIC_FETCH_AND — Атомарная побитовая операция AND с предварительным извлечением

Описание:

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

Стандарт:

TS 18508 или более поздняя версия

Класс:

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

Синтаксис:

CALL ATOMIC_FETCH_AND (ATOM, VALUE, OLD [, STAT])

Аргументы:

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

Пример:

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

См. также:

ATOMIC_DEFINE — Атомарная установка переменной, ATOMIC_AND — Атомарная побитовая операция AND, ISO_FORTRAN_ENV, ATOMIC_FETCH_ADD — Атомарная операция сложения с предварительным извлечением, ATOMIC_FETCH_OR — Атомарная побитовая операция OR с предварительным извлечением, ATOMIC_FETCH_XOR — Атомарная побитовая операция XOR с предварительным извлечением

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-14.2.0/gfortran/ATOMIC_005fFETCH_005fAND.html