9.201 MOVE_ALLOC — Перемещение выделения памяти из одного объекта в другой

Описание:

MOVE_ALLOC(FROM, TO) перемещает выделение памяти из FROM в TO. FROM будет освобожден в процессе.

Стандарт:

Fortran 2003 и более поздние версии

Класс:

Чистая подпрограмма

Синтаксис:

CALL MOVE_ALLOC(FROM, TO)

Аргументы:

FROM	ALLOCATABLE, INTENT(INOUT), может быть любого типа и вида.
TO	ALLOCATABLE, INTENT(OUT), должен быть того же типа, вида и ранга, что и FROM.

Возвращаемое значение:

Ничего

Пример:

program test_move_alloc
    integer, allocatable :: a(:), b(:)

    allocate(a(3))
    a = [ 1, 2, 3 ]
    call move_alloc(a, b)
    print *, allocated(a), allocated(b)
    print *, b
end program test_move_alloc