Hopla,

Est-ce que vous pensez qu'un jour le compilateur Delphi supportera des
extensions OpenMP pour faciliter l'écriture de programme réalisant des
traitements parallèles ?

http://en.wikipedia.org/wiki/OpenMP
http://msdn.microsoft.com/msdnmag/is...efault.aspx#S1

Ca a l'air sympa comme tout à écrire. Plus simple en tous les cas que
créer des threads et attendre qu'ils aient fini :

#include <omp.h>
#include <stdio.h>

main()
{
int i,t[10];

#pragma omp parallel
#pragma omp for
for (i=0; i< 10 ; i++)
{
// chaque thread va gérer une partie de la boucle
t[i]=omp_get_thread_num();
}

// la directive pragma omp for s'applique au premier for seulement
// affichage
for (i=0; i< 10 ; i++)
{
printf("t[%d]=%d\n",i,t[i]);
}
}

Sur une machine avec deux processeurs:
../boucle
t[0]=0
t[1]=0
t[2]=0
t[3]=0
t[4]=0
t[5]=1
t[6]=1
t[7]=1
t[8]=1
t[9]=1

http://browalle.ujf-grenoble.fr:8080...guage=fr&cl=fr

@+

--
Pierre Y.
KeyID : 0x7890CFE9
Viadéo : http://www.viadeo.com/invitationpers...221mij222775qk