Gfortran знак-расширение для работы с битами
Я использовал zext() функция с компилятором Sun Studio Fortan, для преобразования integer(kind=1) в integer(kind=4), чтобы иметь возможность манипулировать битами с ibits() функция.
например:
! Accessing the most significant bit of a byte status
integer(kind=1) :: status
integer :: msb
msb = ibits (zext (status), 7, 1)
Кажется, что эта функция не является частью компилятора gfortran.
Есть ли в gfortran эквивалентная функция?