bonak@herky.cs.uiowa.edu (Esmail Bonakdarian) (04/09/91)
It the following subtype declaration (line 3) legal? The LRM seems to
specify a type_mark after the 'is' reserved word (and an optional
constraint).
The Meridian compiler compiles this code without any problems though the
Telesoft compiler I have access to does not like it. I can fix the code by
changing line 3 to
subtype ROW_TYPE is INTEGER range 1 .. ROWS;
Am I reading the LRM incorrectly or have I stumbled across a bug in this
compiler? I would like somebody to confirm this for me before I contact
Meridian (by the way, do they have an e-mail address?).
Thanks.
Esmail
------------------
Meridian AdaVantage v4.1 Source file: bug.ada Page 1
Sun Apr 7 1991 19:25:17
1 procedure BUG is
2
3 ROWS: constant := 5;
4
5 subtype ROW_TYPE is 1 .. ROWS;
6
7 begin
8 null;
9 end;
Compilation Summary
Ada library used: ada.lib
Compile options:
(none)
9 lines compiled.
9 lines listed.
No errors detected.
No warnings reported.abbasi@smaug.enet.dec.com (Nasser ABBASI) (04/09/91)
In article <5385@ns-mx.uiowa.edu>, bonak@herky.cs.uiowa.edu (Esmail Bonakdarian) writes... >It the following subtype declaration (line 3) legal? The LRM seems to >specify a type_mark after the 'is' reserved word (and an optional >constraint). > >The Meridian compiler compiles this code without any problems though the >Telesoft compiler I have access to does not like it. I can fix the code by >changing line 3 to > >subtype ROW_TYPE is INTEGER range 1 .. ROWS; > >Am I reading the LRM incorrectly or have I stumbled across a bug in this >compiler? I would like somebody to confirm this for me before I contact >Meridian (by the way, do they have an e-mail address?). > >Thanks. > >Esmail >------------------ > Meridian AdaVantage v4.1 Source file: bug.ada Page 1 > Sun Apr 7 1991 19:25:17 > > > 1 procedure BUG is > 2 > 3 ROWS: constant := 5; > 4 > 5 subtype ROW_TYPE is 1 .. ROWS; > 6 > 7 begin > 8 null; > 9 end; > > Compilation Summary > Ada library used: ada.lib > Compile options: > (none) > 9 lines compiled. > 9 lines listed. > No errors detected. > No warnings reported. The Above should not compile successfully, VAX/VMS ADA compiler showes error: BUG 9-Apr-1991 01:31:21 VAX Ada V2.1-28 Page 1 1 procedure BUG is 2 ROWS: constant := 5; 3 subtype ROW_TYPE is 1 .. ROWS; ............................1 %ADAC-E-FOUNDEXP, (1) Found number 1 when expecting one of { identifier string-literal character-literal } %ADAC-I-IGNOREDECLL, (1) Declaration ignored due to syntactic errors 4 begin 5 null; 6 end; /naser