[open-cobol-list] bug: standard-feature "qualification with file-name" does not work

[Thomas Biehler]

hi keisuke,

compiling the attached program "QUALFILE.cob" (in "free-format")
shows the bug.

It seems that "qualification with file-name" 
does not work at all at the moment!

The following output is from my lightly patched version 
of the current cvs-version of open-cobol.
(my patch: Error-Message(s) includes explicitly the string  "error  : " ) 

I==================================================================
#> cobc -free QUALFILE.cob
QUALFILE.cob:24: error  : `TESTFILE-KEY' in `TESTFILE-RECORD' in `TESTFILE' 
undefined
QUALFILE.cob:29: error  : `TESTFILE-KEY' in `TESTFILE-2' undefined
QUALFILE.cob: In paragraph `S-01':
QUALFILE.cob:48: error  : `TESTFILE-KEY' in `TESTFILE-RECORD' in `TESTFILE' 
undefined
QUALFILE.cob:50: error  : `TESTFILE-CONTENT' in `TESTFILE-RECORD' in 
`TESTFILE' undefined
QUALFILE.cob:51: error  : `TESTFILE-RECORD' in `TESTFILE' undefined
tree.c:1121: invalid type cast from `#<unknown constant>' at QUALFILE.cob:51
Abgebrochen
===================================================================

Thomas

QUALFILE.cob
Description: Text document