User Profile

sjdltzy · Aug 26 '10, 05:21 PM

Here is an example of Fortran ,but I can't run it in ivf 11.

Code:

 MODULE m
 TYPE t(k)
 INTEGER, KIND :: k
 REAL(k),POINTER :: vector(:) => NULL()
 CONTAINS
 FINAL :: finalize_t1s, finalize_t1v, finalize_t2e
 END TYPE
 CONTAINS
 SUBROUTINE finalize_t1s(x)
 TYPE(t(KIND(0.0))) x
 IF (ASSOCIATED(x%vector)) DEALLOCATE(x%vector)
 END SUBROUTINE
 SUBROUTINE finalize_t1v(x)

...

sjdltzy · Aug 15 '10, 01:47 PM

I'm writing a dll for other people ,but I don't wan't to give him codes.
How can I export the function class and namespace in dll .like:
namespace name
{
class a
{
a();
~a();
public :
int fun1(int i);
double b;
};
int fun2(int j);
}

User Profile

Profile Sidebar

A question of Fortran 2003

how to export function in namespace to dll