gnucobol-users
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [open-cobol-list] openCobol performances issues


From: ARCHAMBAULT Philippe
Subject: Re: [open-cobol-list] openCobol performances issues
Date: Mon, 15 Sep 2014 08:07:20 +0000

Hello,  problem solved

 

 

Many thanks, the problem is option bynary-truncate.

 

We are using a customized configuration file with option binary-truncate = yes, when i change this option i have a real amelioration.

 

We continue to investigate

 

 

 

 

 

 

 

 

De : ARCHAMBAULT Philippe [mailto:address@hidden
Envoyé : lundi 15 septembre 2014 08:10
À : Ron Norman
Cc : address@hidden
Objet : Re: [open-cobol-list] openCobol performances issues

 

Hello,

 

we know that if we change the type of a variable test is faster ... But ... it is a migration and our guys developers do not want to change the program lines.

 

 

 

Result of my test:

       IDENTIFICATION DIVISION.

       PROGRAM-ID. TESTCOB.

       ENVIRONMENT DIVISION.

       CONFIGURATION SECTION.

       INPUT-OUTPUT SECTION.

       DATA DIVISION.

       WORKING-STORAGE SECTION.

       01  NumericArea.

           02   nums99       pic s9(09) binary.

       PROCEDURE DIVISION.

       DEBUT-PROGRAMME.

           move 0 to nums99

           PERFORM 200000000 TIMES

                 add 1 to nums99

           end-perform.

           stop run.

 

 

Test1 with O2 option

 

export LD_LIBRARY_PATH=/usr/local/lib:$LD_LIBRARY_PATH

cobc -O2 ./testcob1.cob

#cat /proc/cpuinfo | grep vendor_id

time ./testcob1

 

real    0m13.814s

user    0m13.795s

sys     0m0.004s

 

 

Test2 with O option

export LD_LIBRARY_PATH=/usr/local/lib:$LD_LIBRARY_PATH

cobc -O ./testcob1.cob

#cat /proc/cpuinfo | grep vendor_id

time ./testcob1

 

real    0m13.766s

user    0m13.744s

sys     0m0.004s

 

 

 

 

Can you say me what is your configuration test ? i never had a time under 13 seconds with my computer (x86 and zSeries)

 

I am on redhat 6.4  (same result on redhat 7.0)

 

 

Thanx

 

 

 

 

 

De : Ron Norman [mailto:address@hidden]
Envoyé : samedi 13 septembre 2014 21:10
À : ARCHAMBAULT Philippe
Cc : address@hidden
Objet : Re: [open-cobol-list] openCobol performances issues

 

Using the cobc option -O2 does make a big difference in the speed.

On an x86 system running in 32 bit mode...

Using Micro Focus COBOL with -O.

 

>time tstadd

0.653u 0.003s 0:00.67 97.0%     0+0k 144+8io 1pf+0w

 

Using OpenCOBOL with no -O2

>time tstadd

1.463u 0.000s 0:01.47 99.3%     0+0k 0+0io 0pf+0w

 

 

Using OpenCOBOL with -O2:

 >time tstadd

0.638u 0.002s 0:00.64 98.4%     0+0k 136+0io 1pf+0w

 

So using OpenCOBOL with the -O2 option runs faster than Micro Focus on the same computer. 

 

 

On Fri, Sep 12, 2014 at 9:47 AM, ARCHAMBAULT Philippe <address@hidden> wrote:

Hello,

 

We are migrating from Pseries to Zseries  zLinux (redhat 6.4) and from Microfocus Cobol to GNUCobol 1.1, and on certains programs we see bad CPU Performance

 

 

 

For examples this kind of test:

 

Loop on add 1 to a variable define in PIC S9(09) binary     we see:

                AIX MFCobol     0,960 sec cpu                     /               linux OCobol    16,411 sec CPU

 

Same test on pic s9(03), pic 9(07), pic 9(10) Packed decimal, pic9(09) comp-5 do same results…

 

Same result on xLinux (rh 6.4) on HPBlade

 

sample program:

 

       IDENTIFICATION DIVISION.

       PROGRAM-ID. TESTCOB.

       ENVIRONMENT DIVISION.

       CONFIGURATION SECTION.

       INPUT-OUTPUT SECTION.

       DATA DIVISION.

       WORKING-STORAGE SECTION.

       01  NumericArea.

           02   nums99       pic s9(09) binary.

       PROCEDURE DIVISION.

       DEBUT-PROGRAMME.

           move 0 to nums99

           PERFORM 200000000 TIMES

                 add 1 to nums99

           end-perform.

           stop run.

 

 

Any ideas ?

 

 

 

 


*****************************************************************************************

Ce message électronique, les éventuels fichiers joints et les informations qu'il contient, peuvent être couverts par le secret professionnel et sont exclusivement adressés à son destinataire. Si vous le recevez par erreur, merci d'en informer l'expéditeur et de le détruire. A ce titre, toute diffusion non autorisée de ce message, même partielle, sous quelque forme que ce soit, est interdite et punie par la loi.

En aucun cas, le contenu de ce message ne peut valoir offre ou acceptation ou engagement de la part de la CNAV.

Les opinions contenues dans ce message sont personnelles à l'émetteur.

Il est de la responsabilité du destinataire de s'assurer que le message et ses éventuelles pièces jointes ne contiennent pas de virus informatique.


------------------------------------------------------------------------------
Want excitement?
Manually upgrade your production database.
When you want reliability, choose Perforce
Perforce version control. Predictably reliable.
http://pubads.g.doubleclick.net/gampad/clk?id=157508191&iu=/4140/ostg.clktrk
_______________________________________________
open-cobol-list mailing list
address@hidden
https://lists.sourceforge.net/lists/listinfo/open-cobol-list



 

--
Cheers

Ron Norman

*****************************************************************************************

Ce message électronique, les éventuels fichiers joints et les informations qu'il contient, peuvent être couverts par le secret professionnel et sont exclusivement adressés à son destinataire. Si vous le recevez par erreur, merci d'en informer l'expéditeur et de le détruire. A ce titre, toute diffusion non autorisée de ce message, même partielle, sous quelque forme que ce soit, est interdite et punie par la loi.

En aucun cas, le contenu de ce message ne peut valoir offre ou acceptation ou engagement de la part de la CNAV.

Les opinions contenues dans ce message sont personnelles à l'émetteur.

Il est de la responsabilité du destinataire de s'assurer que le message et ses éventuelles pièces jointes ne contiennent pas de virus informatique.

*****************************************************************************************

Ce message électronique, les éventuels fichiers joints et les informations qu'il contient, peuvent être couverts par le secret professionnel et sont exclusivement adressés à son destinataire. Si vous le recevez par erreur, merci d'en informer l'expéditeur et de le détruire. A ce titre, toute diffusion non autorisée de ce message, même partielle, sous quelque forme que ce soit, est interdite et punie par la loi.

En aucun cas, le contenu de ce message ne peut valoir offre ou acceptation ou engagement de la part de la CNAV.

Les opinions contenues dans ce message sont personnelles à l'émetteur.

Il est de la responsabilité du destinataire de s'assurer que le message et ses éventuelles pièces jointes ne contiennent pas de virus informatique.


reply via email to

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