6.1.10 Константы литералов BOZ

Помимо десятичных констант, Fortran также поддерживает двоичные (b), восьмеричные (o) и шестнадцатеричные (z) целочисленные константы. Синтаксис: ‘префикс цитата цифры цитата’, где префикс — это либо b, o или z, цитата — это либо ' или ", а цифры — это 0 или 1 для двоичных, между 0 и 7 для восьмеричных, и между 0 и F для шестнадцатеричных. (Пример: b'01011101'.)

До Fortran 95 константы литералов BOZ разрешались только для инициализации целочисленных переменных в операторах DATA. С Fortran 2003 константы литералов BOZ также разрешены в качестве фактических аргументов для REAL, DBLE, INT и CMPLX встроенных функций. Константа литерала BOZ — это просто строка битов, которая дополняется или усекается по мере необходимости при преобразовании в числовой тип. Стандарт Fortran указывает, что обработка знака бита зависит от процессора. Gfortran интерпретирует бит знака так, как ожидается от пользователя.

В качестве устаревшего расширения GNU Fortran допускает шестнадцатеричные константы литералов BOZ, используя префикс X. Константу литерала BOZ также можно указать, добавив суффикс к строке, например, Z'ABC' и 'ABC'X эквивалентны. Кроме того, как расширение, литералы BOZ разрешены в некоторых контекстах за пределами DATA и встроенных функций, перечисленных в стандарте Fortran. Используйте -fallow-invalid-boz для включения расширения.