[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
RE: [open-cobol-list] BUG: 01 Table + nested Table + initialization --
From: |
William M. Klein |
Subject: |
RE: [open-cobol-list] BUG: 01 Table + nested Table + initialization --> generates error in codegen.c |
Date: |
Tue Jun 1 12:24:10 2004 |
Was this compiled with MF?
Having an OCCURS at the 01-level is illegal in:
ANSI/ISO
IBM (mainframe)
I *think* but haven't checked that most other PC/Unix compilers also treat
it as an error, e.g. Fujitsu, RM, AcuCOBOL, etc.
MF *does* document this as a supported extension. As I recall (but couldn't
find quickly) they "deprecate" its use - but it is still supported.
> -----Original Message-----
> From: address@hidden
> [mailto:address@hidden On
> Behalf Of Thomas Biehler
> Sent: Tuesday, June 01, 2004 4:35 AM
> To: Keisuke Nishida
> Cc: address@hidden
> Subject: [open-cobol-list] BUG: 01 Table + nested Table +
> initialization --> generates error in codegen.c
>
> Hi Keisuke,
>
> the attached program "TABBUG.cob" demonstrates the bug:
>
> #> cobc -std=mf -fixed TABBUG.cob
> codegen.c:245: invalid type cast from `null' at TABBUG.cob:23
> Aborted
>
> A easy workaround, that i have applied,
> is shifting the first table-definition on a level > 01 .
>
> Thomas
>