[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [open-cobol-list] Calling a system function in Open Cobol.
From: |
John R. Culleton |
Subject: |
Re: [open-cobol-list] Calling a system function in Open Cobol. |
Date: |
Tue, 27 Jun 2006 14:41:35 -0400 |
User-agent: |
KMail/1.9.3 |
On Monday 26 June 2006 06:07, Roger While wrote:
> Works fine here (0.33 tarball)
> Also works under Cygwin and MSYS/MinGW.
> Here's the genned code (no special OC options) -
> {
> {
> int (*func)();
> cob_call_params = 1;
> func = cob_resolve_1 ("system");
> (*(int *) (b_2)) = func ((unsigned char *)"ls -l");
> }
> And here it is with -static option -
> {
> {
> cob_call_params = 1;
> (*(int *) (b_2)) = system ((unsigned char *)"ls -l");
> }
> }
>
> Looks fine to me :-)
>
However the latest stable version is 32, not 33.
Fop now I'll go with TinyCobol. I have a prejudice in favor of
things that work.
--
John Culleton
Books with answers to marketing and publishing questions:
http://wexfordpress.com/tex/shortlist.pdf
Book coaches, consultants and packagers:
http://wexfordpress.com/tex/packagers.pdf