[Info-vax] basic BASIC question

Simon Clubley clubley at remove_me.eisner.decus.org-Earth.UFP
Mon Feb 3 13:35:00 EST 2025


On 2025-01-31, Arne Vajhøj <arne at vajhoej.dk> wrote:
>
> Fortran got some other rather unique usages
> of logicals:
>
> $ type morelogfun.for
>        program morelogfun
>        logical*1 a(12)
>        data a/1hH,1he,1hl,1hl,1ho,1h ,1hw,1ho,1hr,1hl,1hd,1h!/
>        integer*4 i
>        write(*,*) (a(i),i=1,12)
>        write(*,'(1x,12a1)') (a(i),i=1,12)
>        end
> $ for morelogfun

DEC Fortran still allows Hollerith constants without having to specify
a compiler option to enable them ?

For people who do not know historical Fortran, see:

https://en.wikipedia.org/wiki/Hollerith_constant

Hollerith constants have been removed from the current Fortran language
standards (and rightly so).

> $ lin morelogfun
> $ run morelogfun
> F T F F T F T T F F F T
> Hello world!
>

Simon.

-- 
Simon Clubley, clubley at remove_me.eisner.decus.org-Earth.UFP
Walking destinations on a map are further away than they appear.


More information about the Info-vax mailing list