[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[open-cobol-list] CVS update + 5
From: |
Roger While |
Subject: |
[open-cobol-list] CVS update + 5 |
Date: |
Fri Feb 11 09:18:43 2005 |
From a day or so ago:
Rearrange the field order in the generated
C header file for program generation.
First we have the actual field definitions, then
the field atrributes and finally the cob_field structs.
External item pointers moved to the local static program
function.
From today :
Reorder the cob_module structure and initialize correctly.
Do a small optimization in codegen.
Fix a possible overflow.
Fix the ARGUMENT-NUMBER/VALUE.
(Thanks to Franklin Ankum for spotting this)
This now works compatible to MF.
I also noticed that A-NUMBER was returning one too many.
So -
PROG -
ACCEPT X FROM ARGUMENT-VALUE
DISPLAY X
ACCEPT Y FROM ARGUMENT-NUMBER
DISPLAY Y
DISPLAY 0 UPON ARGUMENT-NUMBER
ACCEPT X FROM ARGUMENT-VALUE
DISPLAY X
cobc PROG.cbl
"./PROG MYARG" gets
MYARG
0001
./PROG
cobc -m PROG.cbl
"cobcrun PROG MYARG" gets
MYARG
0001
PROG
As usual with CVS checkouts, recompile your progs :-)
Roger
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [open-cobol-list] CVS update + 5,
Roger While <=