Salut ,

j'utilise une bibliotheque Fortran dans un programme C++ , et je veux gérer les erreurs.

Voila, la fonction Fortran :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
      SUBROUTINE XERBLA(SRNAME,INFO)
* Generated on Fri Oct  5 13:14:06 RDT 2007 by libs/lapack/build.sh 
* Calls a C function on run-time error inside Lapack/Blas
      INTEGER INFO
      CHARACTER*6 SRNAME
      Call xerbla_c(SRNAME,INFO)
      RETURN
      END
Et dans mon code C++ :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
static void
xerbla_cpp(const char *srname, const int *info)
{
 //
 // TRAITEMENT : un printf() par exemple. 
 //
}
 
extern "C"
{
 
void
xerbla_c__(const char *srname, const int *info)
{
  xerbla_cpp(srname, info);
}
 
}

Je veux convertir SRNAME pour que mon programme tiens la route

Merci,