bug-gnucobol
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[open-cobol-list] Bug List comments


From: Roger While
Subject: [open-cobol-list] Bug List comments
Date: Sun Oct 31 11:00:14 2004

The compiler abort problem (sy012.cob) is caused
by a negated test on an 88 level for a pointer item.
Like this :
01   XXX.
  03   MYPTR  POINTER VALUE NULL.
     88  MYPTR-NULL       VALUE NULL.

IF NOT MYPTR-NULL
....

Question here is if it is valid to have an 88 on a
POINTER item ? The only use I can see is exactly as
above (and in sy012.cob) to test for NULL.
ACU rejects the 88, MF accepts it but according to MF doc
it shouldn't - Hmm.

Keisuke ? Bernard ? Thoughts ? Reject the 88 or not ?

For info: the problem appears in typeck.c in
function expr_reduce - case "!". TREE_CLASS is
POINTER, therefore cb_build_binary_op gets called
with parameter expr_op which is 0.

Roger




reply via email to

[Prev in Thread] Current Thread [Next in Thread]