Discussion :

[GaetanNe]

Bonjour,

Je dois développer sous Visual 6 un programme en C++ faisant également appel à des sous-routines en Fortran. Le travail s'est déroulé, en utilisant en option pour les Calling Convention (Convention d'appels), stdcall, et en écrivant en C++ les déclarations de sous-routines fortran sous la forme :

extern "C" __stdcall void NOMDEFONCTION(int*,int*);

Tous semble se gater sous Visual 6 lorsque je veux également passer des chaines de caractères, en plus des entiers, comme argument :

J'ai essayé de conserver les mêmes conventions stdcall, de les enlever ou de jouer sur les déclarations avec :


extern "C" __stdcall void NOMDEFONCTION(int*,int*, char*);

ou

extern "C" void NOMDEFONCTION(int*,int*, char*);

Mais rien ne semble fonctionner ! Au pire la compilation est refusée avec les messages :

main.obj : error LNK2001: unresolved external symbol _FONCTION1@12
main.obj : error LNK2001: unresolved external symbol _FONCTION2@16

Au mieux, j'ai changé les conventions d'appel du projet principal et de celui contenant les fichiers fortran, en ' cdecl ', qui doivent permettre de développer la librairire fortran qui est liée au projet.
Mais dans cette situation, l'éxécution démarre correctement avec de s'arrêter, notamment en raison de passages incorrects des valeurs entières dans les sous-routines fortran

Quelqu'un pourrait-il me renseigner et m'indiquer quelles sont les conventions d'écriture des méthodes et de leur déclaration pour permettre le passage de chaine de caractères de c++ à fortran ?

Cmment réaliser cet appel, en passant quand même des chaines de caractères en argument ?

Il semble que ce point est le seul bloquant car les sous-routines ne passant pas de chaines de caractère fonctionnent parfaitement.

Je galère sur ce projet, ce qui est d'autant plus rageant car il fonctionne correctement sous Visual 2005, mais les noms des conventions d'appel sont différents de V6. Cependant, je dois maintenant le redévelopper sous Visual 6 d'où mes difficultés.

D'avance merci de votre aide,

[Sylvain Bergeron]

La grande majorité des compilateurs Fortran ajoute un argument de longueur lors du passage des chaînes de caractères. Ce paramètre est caché en Fortran, mais doit être explicite dans les autres langages. Il y a autant d'argument caché qu'il y a d'argument caractère, et ils sont passés (généralement) par valeur et non par référence, à la fin de la liste d'arguments.

Le prototype devient alors :

extern "C" __stdcall void NOMDEFONCTION(int*,int*, char*, int);

[GaetanNe]

OK,

Super !!
Cela fonctionne maintenant correctement avec la correction proposée.
Je n'ai rien touché en fortran mais j'ai modifié la ligne de déclaration des sous-routines en c++ par celle proposée et rajoutée la longueur de la chaine de caractères en argument dans les lignes nécessaires.

Question subsidiaire : est-ce que cela fonctionnera systématiquement pour toutes les options envisageables du projet c++ en visual 6 cad _cdecl et _stdcall ? il semble que cela soit le cas car, pour peu que le terme _stdcall soit précisé avant les définitions des fonctions en en-tête du main.cpp, la compilation et l'éxécution semblent valable.

Encore merci,

GaetanNe

[Sylvain Bergeron]

est-ce que cela fonctionnera systématiquement pour toutes les options envisageables du projet c++ en visual 6 cad _cdecl et _stdcall ?

Je ne vois pas trop le lien. Je crois que oui. Quelqu'un d'autre maitrise mieux le sujet ?

[Matthieu Brucher]

Si c'est un stdcall, normalement ça devrait passer si ton code Fortran est du Fortran 77 voire 90 sans module. Sinon, il y a le module ISO_C_BINDING qui te permettra de t'assurer les types qui proviennent de ton code C++.
Le gros souci est de savoir si le nom de tes fonctions Fortran est en majuscules, en minuscules, avec un "_" postfixé, 2, aucun... C'est dépendnat su compilateur, tout comme les bibliothèques support.