[Info-vax] basic BASIC question

[Arne Vajhøj]

On 2/3/2025 3:39 PM, Arne Vajhøj wrote:
> On 2/3/2025 1:35 PM, Simon Clubley wrote:
>> 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).
> 
> It is an extension in VMS fortran.
> 
> And even though it is a horrible way to do text, then it
> is not something one get to use accidentally.

Note that it does give warnings with /STAND=F90 and
/STAND=F95.

But default is /NOSTAND (which really could have
been called /STAND=VAX in my opinion as VAX Fortran
is a thing).

The problem with /STAND=F9x is that it also give
warnings for other things that may be deemed less
important. For the above code logical*1 and integer*4
also gives warning with /STAND=F9x.

Arne