[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[open-cobol-list] Open-Cobol 0.31
From: |
Ron Norman |
Subject: |
[open-cobol-list] Open-Cobol 0.31 |
Date: |
Wed Mar 30 12:24:41 2005 |
I recently downloaded this and built it on a Linux system.
I foud a few problems and made code changes to solve them. I'm not sure if my
changes are 100% correct, but how would I go about passing these changes back
for future release?
Problem #1.
I have several COBOL applications that have many sections but the same
paragraph names in each section. For example, Paragraph L00. was always the
first and L99. was the last. The code in the section woudl then GO TO L99 to
exit the section. But this caused problems because the program had many
different paragraphs called L99. I added an array of (current-section) and then
in cb_ref, scanned that array to find the paragraph that was in the same
section as the GOTO.
Problem #2. When a REDEFINES was longer than the redefined item, it considered
this an error. I changed this to be a warning and to smack the size of the
redefined item to be the longer length.
Problem #3. I mostly use Micro Focus and it has an internal method for
determining how many parameters are being passed on a CALL. My primary product
has an old mainframe style API which needs to detect how many parameters where
passed on the CALL. I changed the codegen.c module to search an array of known
routines and replace them by a call to an alternate routine witht eh 1st
parameter being the number of parameters on the CALL statement. it would be
nice if there was more elegant solution.
Cheers
Ron Norman
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [open-cobol-list] Open-Cobol 0.31,
Ron Norman <=