PGI User Forum

[Eos Pengwern]

Setting the number of threads once at the beginning of the program definitely doesn't work. If, in the initialisation section of the program, I put the code:

[hongyon]

Hi,

You are correct that the crash is due to the fact that Fortran is called from C++. Currently it is required that you call pghpf_init from your main program if you are going to use it with Fortran. It is required only on windows.

Here is example:
main.c:

extern "C" void foo_ ( int * );
extern "C" void pghpf_init(int *);
static int zz = 0;
main(int argc, char **argv)
{
int i;
pghpf_init(&zz);
i = 19;
foo_(&i);
}

foo.f90:
subroutine foo (i)
integer i
print *, i
end subroutine foo

Let me know if this helps.
Hongyon

[Eos Pengwern]

Thanks Hongyon;

However, I already have a call to pghpf_init at the beginning of my program; the C++ program calls it from its 'main' routine, immediately before the first call to the Fortran routine where the OpenMP settings are initialised.

Stephen.

[hongyon]

Which version of PGI you are using?
Which C++ compiler do you use?
How do you link with openmp library?
What is the command line? What is your OS?


Here is example with pgcpp and pgf90:

%pgf90 foo.f90 -mp -c
%pgcpp myproc.cpp foo.obj -mp -pgf90libs


Hongyon

[Eos Pengwern]

Thanks Hongyon;

I'm using PGU Visual Fortran V10.8 with Microsoft VC++ 2008. I link with the OpenMP library just by selecting the "Process OpenMP directives" option in the Project property menu. The complete command line is:

(compiler)
-Mpreprocess -DPGI -DUSE_MKL -Bdynamic -Mbackslash -mp -I"C:\Program Files\Intel\MKL\10.2.2.025\include" -I"c:\program files\pgi\win64\10.8\include" -I"C:\Program Files\PGI\Microsoft Open Tools 10\include" -I"C:\Program Files\PGI\Microsoft Open Tools 10\PlatformSDK\include" -fastsse -tp=nehalem-64 -Minform=warn

(linker)
-Mmakedll -Bdynamic -mp -o "D:\Documents\Visual Studio 2008\Builds\Release_x86-64\nCore_PGI_x86-64.dll" -Wl,/libpath:"C:\Program Files\Intel\MKL\10.2.2.025\em64t\lib" mkl_solver_lp64_sequential.lib mkl_intel_lp64_dll.lib mkl_sequential_dll.lib mkl_core_dll.lib

All this is in indows & Ultimate 64-bit on a Lenovo W510 with an Intel i7 processor.

Stephen.