[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: gnubol: How do we parse this language, anyway?
Mike & Co.,
Here are my results from CA-Realia. I'll ask a customer to compile it with
the IBM compiler and forward those results as well. Jonathan
CA-Realia COBOL Compiler Version 6.0.47
Copyright (c) 1981, 1998 Computer Associates International, Inc.
08:31:53 Pass 1
08:31:53 Pass 1a
08:31:53 Pass 2
08:31:53 Pass 2a
38 E Maximum number of exceptions exceeded at 'NOT'
41 E Maximum number of exceptions exceeded at 'NOT'
46 C Expected explicit scope terminator, found '.'; scope terminator
assumed
present
46 C Expected explicit scope terminator, found '.'; scope terminator
assumed
present
cobtest has 2 C Level + 2 E Level messages
08:31:53 Pass 5
08:31:53 End of compilation
At 09:52 PM 12/3/99 -0500, you wrote:
>>>>>> "Sébastien" == =?iso-8859-1?Q?S=E9bastien=20Ducl=E9roir?= <iso-8859-1>
>>>>>> wrote the following on Fri, 03 Dec 1999 18:49:02 +0100
>
> Sébastien> Mike Mckernan a écrit :
> >> We had hoped that someone would be able to try this program on
> >> one or more IBM compilers, but that has not happened, at least
> >> not yet.
> >>
>
> Sébastien> I don't read the list regularly, so I miss this thread
> Sébastien> about a test program. We use IBM Cobol compiler on AIX
> Sébastien> 4.2.1, so, if not too late, I can compile the test
> Sébastien> programm if you send it to me, or tell me where to get
> Sébastien> it quickly, cause I'm a little bit busy those days :(
>
> Sébastien> Regards,
>
>
>
>>>>>> "Jonathon" == J & C Migrations, Pty <migrate@tiac.net>
>>>>>> wrote the following on Fri, 03 Dec 1999 14:11:00 -0500
>
> Jonathon> At 12:40 PM 12/3/99 -0500, Mike Mckernan wrote: <snip>
>
> >> We had hoped that someone would be able to try this program on
> >> one or more IBM compilers, but that has not happened, at least
> >> not yet.
>
> Jonathon> If the tests are not too large, I may be able to help the
> Jonathon> next time around. I have limited access to IBM's COBOL
> Jonathon> for MVS & VM, and to the CA-Realia COBOL compilers. With
> Jonathon> some effort I can also access an ACUCOBOL GT compiler.
>
>
> IDENTIFICATION DIVISION.
> PROGRAM-ID. COBOL-TEST.
> DATA DIVISION.
> WORKING-STORAGE SECTION.
> 01 W PIC 9.
> 01 X PIC 9.
> 01 Y PIC 9.
> 01 Z PIC 9.
>
> PROCEDURE DIVISION.
> 001.
> MOVE 8 TO X Z
> MOVE 9 TO W Y
>
> ADD 1 TO W
> SIZE ERROR
> DISPLAY "OVERFLOW ON W"
>
> ADD 1 TO X
> SIZE ERROR
> DISPLAY "OOPS - UNEXPECTED RESULT"
>
> NOT SIZE ERROR
> DISPLAY "NO OVERFLOW ON X"
>
> ADD 1 TO Y
> SIZE ERROR
> DISPLAY "OVERFLOW ON Y"
>
> ADD 1 TO Z
> SIZE ERROR
> DISPLAY "OOPS - UNEXPECTED RESULT"
>
> NOT SIZE ERROR
> DISPLAY "NO OVERFLOW ON Z"
> DISPLAY "RIGHT ASSOCIATION IS SUFFICIENT"
>
> NOT SIZE ERROR
> DISPLAY "OOPS - UNEXPECTED RESULT"
>
> NOT SIZE ERROR
> DISPLAY "OOPS - UNEXPECTED RESULT"
>
> END-ADD
>
> .
>
>
>
>
>--
>This message was sent through the gnu-cobol mailing list. To remove yourself
>from this mailing list, send a message to majordomo@lusars.net with the
>words "unsubscribe gnu-cobol" in the message body. For more information on
>the GNU COBOL project, send mail to gnu-cobol-owner@lusars.net.
>
>
--------------------------------------------------------------------
J & C Migrations, Pty.
566 Centre Street, Suite 3 http://www.jcmigrations.com
Newton, MA 02458 Fax: +1 (617) 916-5113
USA Tel. +1 (617) 916-5114
--
This message was sent through the gnu-cobol mailing list. To remove yourself
from this mailing list, send a message to majordomo@lusars.net with the
words "unsubscribe gnu-cobol" in the message body. For more information on
the GNU COBOL project, send mail to gnu-cobol-owner@lusars.net.