我在Sun Studio Fortan编译器中使用了zext()
函数,将integer(kind=1)
转换为integer(kind=4)
,以便能够使用ibits()
函数来操作位。 / p>
例如:
! Accessing the most significant bit of a byte status
integer(kind=1) :: status
integer :: msb
msb = ibits (zext (status), 7, 1)
似乎这个函数不是gfortran编译器的一部分。
gfortran中是否有可用的等效功能?