gnucobol-users
[Top][All Lists]
Advanced

[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





reply via email to

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