[Info-vax] Text processing examples with Fortran requested

[glen herrmannsfeldt]

Bob Koehler <koehler at eisner.nospam.encompasserve.org> wrote:
(snip regarding IBM compilers)
 
>   We used H Extended, which claimed only to be a FORTRAN-IV.  I've
>   never seen any version of the 370 series compilers that supported
>   the ".eqs." et.al. operators that guarantee ASCII collating sequence
>   (on ASCII systems .eqs. is the same operation as .eq. for CHARACTER).

VS Fortran was the Fortran 77 compiler, and I believe still is.
There is no .EQS. in Fortran 2003, which most likely means that
there wasn't one in Fortran 77.  (Very few features were removed.)

The IACHAR function returns an integer specifying the position
in the ASCII collating sequence of a single character.  The
logical functions LGE, LGT, LLE, and LLT compare CHARACTER variables
as ASCII and return the appropriate LOGICAL result.
 
>   I wonder if IBM ever did that after I last looked?
 
>   When we wanted to compare individual characters on our 360 we 
>   stuffed them into LOGICAL*1, which caused warnings after we upgraded 
>   to H Extended.

Last I remember, which may have been Fortran H (not extended) you
couldn't compare LOGICAL*1.  Possibly H extended with the XL option.
(Much of the H and H extended compiler code is written in Fortran,
and the XL features are meant to be used compiling itself.)

-- glen