[Info-vax] VSI Community License Program - x86
Arne Vajhøj
arne at vajhoej.dk
Mon Apr 10 19:14:23 EDT 2023
On 4/10/2023 6:14 PM, bill wrote:
> On 4/10/2023 4:16 PM, Arne Vajhøj wrote:
>> On 4/10/2023 10:19 AM, bill wrote:
>>> On 4/9/2023 8:05 PM, Arne Vajhøj wrote:
>>>> On 4/9/2023 11:35 AM, bill wrote:
>>>>> Well, that's a small bummer. My biggest interest is in COBOL but I
>>>>> guess I could play with the Fortran a bit. But my interest in
>>>>> Fortran runs out around Fortran-77. :-)
>>>>
>>>> It should compile Fortran 77 just fine.
>>>
>>> I thought VMS Fortran was up at least to Fortran 99. I was just
>>> hinting that, like COBOL, I have no interest in and see little
>>> value in the more modern accretions.
>>
>> Fortran 90/95.
>>
>> So they added a ton of features. But they did not remove
>> the old stuff.
>>
>> So your Fortran 77 code should compile fine.
>>
>> (I believe the Fortran 90 standard explicit required Fortran
>> 77 compatibility, but that the Fortran 95 standard removed some
>> of the 77 stuff, which does not matter as VSI Fortran kept
>> that stuff)
>
> As I understand it Fortran (much like COBOL) added a lot of junk
> that had nothing to with the intended function of the language.
> In the case of COBOL, thankfully, it was mostly ignored by true
> practitioners of the art. Fortran did not fare as well.
Practical:
$ type bill.for
program bill
integer*4 hw(2), lbl
data hw/4hHi B,4hill!/
assign 100 to lbl
goto lbl
stop
100 write(6,200) hw
200 format(1x,2a4)
end
$ fortran bill
$ link bill
$ run bill
Hi Bill!
$ fortran/stand=f90 bill
integer*4 hw(2), lbl
..............^
%F90-W-WARNING, Fortran 90 does not allow this length specification. [4]
at line number 2 in file DISK2:[ARNE]bill.for;1
data hw/4hHi B,4hill!/
..............^
%F90-W-WARNING, In Fortran 90, the obsolescent Hollerith constant is not
permitted in this context. [4HHi B]
at line number 3 in file DISK2:[ARNE]bill.for;1
data hw/4hHi B,4hill!/
.....................^
%F90-W-WARNING, In Fortran 90, the obsolescent Hollerith constant is not
permitted in this context. [4Hill!]
at line number 3 in file DISK2:[ARNE]bill.for;1
data hw/4hHi B,4hill!/
..............^
%F90-W-WARNING, A character string or Hollerith string is non-standard
in this context. [4HHi B]
at line number 3 in file DISK2:[ARNE]bill.for;1
data hw/4hHi B,4hill!/
.....................^
%F90-W-WARNING, A character string or Hollerith string is non-standard
in this context. [4Hill!]
at line number 3 in file DISK2:[ARNE]bill.for;1
assign 100 to lbl
......^
%F90-W-WARNING, The ASSIGN statement is obsolete.
at line number 4 in file DISK2:[ARNE]bill.for;1
goto lbl
......^
%F90-W-WARNING, The assign GO TO statement is obsolete.
at line number 5 in file DISK2:[ARNE]bill.for;1
$ link bill
%LINK-W-WRNERS, compilation warnings
in module BILL file DISK2:[ARNE]bill.OBJ;3
$ run bill
Hi Bill!
$ fortran/stand=f95 bill
program bill
^
%F90-W-WARNING, Fixed form source is an obsolescent feature in Fortran 95.
at line number 1 in file DISK2:[ARNE]bill.for;1
integer*4 hw(2), lbl
..............^
%F90-W-WARNING, Fortran 95 does not allow this length specification. [4]
at line number 2 in file DISK2:[ARNE]bill.for;1
data hw/4hHi B,4hill!/
..............^
%F90-W-WARNING, The Hollerith constant has been deleted from Fortran 95.
[4HHi B]
at line number 3 in file DISK2:[ARNE]bill.for;1
data hw/4hHi B,4hill!/
.....................^
%F90-W-WARNING, The Hollerith constant has been deleted from Fortran 95.
[4Hill!]
at line number 3 in file DISK2:[ARNE]bill.for;1
data hw/4hHi B,4hill!/
..............^
%F90-W-WARNING, A character string or Hollerith string is non-standard
in this context. [4HHi B]
at line number 3 in file DISK2:[ARNE]bill.for;1
data hw/4hHi B,4hill!/
.....................^
%F90-W-WARNING, A character string or Hollerith string is non-standard
in this context. [4Hill!]
at line number 3 in file DISK2:[ARNE]bill.for;1
assign 100 to lbl
......^
%F90-W-WARNING, The ASSIGN statement has been deleted in Fortran 95.
at line number 4 in file DISK2:[ARNE]bill.for;1
goto lbl
......^
%F90-W-WARNING, The assign GO TO statement has been deleted in Fortran 95.
at line number 5 in file DISK2:[ARNE]bill.for;1
$ link bill
%LINK-W-WRNERS, compilation warnings
in module BILL file DISK2:[ARNE]bill.OBJ;4
$ run bill
Hi Bill!
Arne
More information about the Info-vax
mailing list