RE: [open-cobol-list] Re: Bug EXTERNAL

[Robert Sherry]

Roger and Bill,

        It is valid on the IBM main frame. I would be happy to provide a
main frame compiler listing. Also, it use to work in the Open Source COBOL
compiler.

        I am working on fixing the problem. Originally, I thought the
problem was in output_file_definition. The routine output_file_definition
calls output_param several times. I now believe the problem is in the
routine output_param. In particular, the statement:
                output_param (f->record_depending, -1);
is generating bad code.

        The output of the compiler includes the statement:

static cob_file h_RFRIN = {0, 1, 0, 0, 0, &c_12, &f_8,
      (f[0].size = 4, f[0].data = b_RECORD_SIZE, f[0].attr = &a_13, &f[0]),
       1, 123, 0, 0, 0, NULL, NULL, NULL, NULL, NULL,
        0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};

The above statement has been reformatted. However, the second line is the
problem. I believe the second line should simple be something like &f_13
where f_13 is the cob field that holds the size of the output record.

Do you think I am on the right track to fix this problem?

Thanks,

Bob Sherry



-----Original Message-----
From: address@hidden
[mailto:address@hidden On Behalf Of Roger
While
Sent: Friday, October 28, 2005 12:14 PM
To: address@hidden
Cc: address@hidden; address@hidden
Subject: [open-cobol-list] Re: Bug EXTERNAL

Bill, is this a valid use of EXTERNAL ?
There are so many differences between C85, C2002, MF,ACU and
main-frame that I can't see the wood for the trees.

Roger





-------------------------------------------------------
This SF.Net email is sponsored by the JBoss Inc.
Get Certified Today * Register for a JBoss Training Course
Free Certification Exam for All Training Attendees Through End of 2005
Visit http://www.jboss.com/services/certification for more information
_______________________________________________
open-cobol-list mailing list
address@hidden
https://lists.sourceforge.net/lists/listinfo/open-cobol-list