On Mon, 28 Sep 2015 14:11:14 -0500 John McKown <john.archie.mck...@gmail.com> wrote:
:>OK, just for "fun", I have downloaded a lot of the company's COBOL source :>to my Linux workstation. I am compiling it with GNU COBOL. The results are :>amazing clean. Well, that is, not many errors. However I have run into one :>which is really confusing me. It is in a data definition. To boil it down :>to a basic level, consider the following, which is accepted by 3.4.1 :>01 A :> 10 B :> 15 C1 :> 15 C2 :> 12 D :> 15 E1 :> 15 E2 :> 10 F :>The GNU COBOL compiler chokes on the "12 D", emitting the error message: :>Warning: No previous data item of level 18 Bug in compiler. No clue where 18 came from. :>This message seem correct to me. There is no requirement that the levels be sequenced. :>Unfortunately the compile listing on z/OS does not have a DMAP (or whatever :>it's called now). But I am thinking that the IBM compiler has inserted a :>FILLER type entry to make the above look like: :>01 A :> 10 B :> 12 FILLER :> 15 C1 :> 15 C2 :> 12 D :> 15 E1 :> 15 E2 :> 10 F :>Does anybody know, for certain sure, what the IBM compiler is doing with :>this. It really seems, to me, that it should be flagging the original code :>as being in error, as the GNU compiler does. What is the error? -- Binyamin Dissen <bdis...@dissensoftware.com> http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN