Discussion :

[Murazor]

Bonjour à tous,

Voilà, j'ai récupéré les codes source Fortran d'une application très complexe venant d'une machine UltraSparc tournant sous Solaris 7.
Lors de la compilation des fichiers 1 à 1 sur ma machine Windows XP, tout se passe bien hormis quelques Warnings qui traînent à droite à gauche.
Mais lorsque je tente de compiler l'ensemble des fichiers en créant un nouveau projet sous Compaq Visual Fortran, j'ai les erreurs suivante dont je comprend le sens mais je n'ai aucune idée de comment les résoudre...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
vvcalthe.obj : error LNK2005: _MAIN__ already defined in vvcalele.obj
bftute.obj : error LNK2001: unresolved external symbol _BFPERCHA@148
brith.obj : error LNK2001: unresolved external symbol _BFC720@52
jdcon5.obj : error LNK2001: unresolved external symbol _MDC816@56
jdcon51.obj : error LNK2001: unresolved external symbol _MDC816@56
Debug/VVasygen.exe : fatal error LNK1120: 3 unresolved externals

N'ayant jamais touché au Fortran de ma vie (même si j'ai saisi son fonctionnement après 2 jours d'analyse de ces codes), je suis un peu perdu

Je vous remercie par avance de votre aide !

[FR119492]

Salut!

Mais lorsque je tente de compiler l'ensemble des fichiers en créant un nouveau projet

Est-ce le compilateur ou l'éditeur de lien qui te donne ces messages?
Jean-Marc Blanc

[Murazor]

C'est bien le compilateur qui me donne ces erreurs. Voici un screenshot :

[FR119492]

Salut!

C'est bien le compilateur qui me donne ces erreurs.

Mais ta copie d'écran montre de manière évidente que ce n'est pas le compilateur, mais l'éditeur de liens (linker).
Jean-Marc Blanc

[Murazor]

Oh... J'ai du mal saisir... Enfin bref, je n'ai toujours pas réussi à avancer dans mon problème...

J'ai juste constaté la chose suivante : lorsque je sors le fichier vvcalthe.f (qui créé le fichier vvcalthe.obj) du projet, l'erreur LNK2005 disparaît alors que si je me contente de mettre la totalité du code de vvcalthe.f en commentaire (sauf le END), l'erreur LNK2005 reste... Je n'y comprends plus rien...

[Sylvain Bergeron]

En Fortran, il y a plein de définitions implicites. Dans l'exemple suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
program Exemple
implicit none
integer i
i = 5
write(*,*) i
stop
end

tu peux enlever les lignes 1,2,3 et 6. Si tu enlèves également les lignes 4 et 5 pour ne conserver que le "end", tu as encore un programme (qui ne fait rien, mais qui est quand même un programme).

L'erreur LNK2005 indique qu'il y a plus d'un programme (principal) dans ton projet. Le fait de tout mettre en commentaire sauf le "end" ne règle évidemment pas le problème, puisque le "end" devient la fin d'un programme. Il y a généralement 2 causes à ce type d'erreur :

• On inclut dans un projet deux fois le programme principale (l'original et une version alternative)
• Une erreur de code source produit un programme principal par accident (par exemple, une boucle est terminée par un end au lieu d'un enddo; la suite devient implicitement un nouveau programme)

Pour les LNK2001, je ne connais pas les fonctions indiquées. Tu dois donc chercher MDC816, BFPERCHA, ... dans les sources pour comprendre (les _ et les @56 ne sont pas dans les sources, ce sont des "décorations" ajoutées par le compilateur). Elles viennent possiblement d'une librairie que tu aurais oubliée d'ajouter au projet. Il est également possible que les options de compilation soient incorrects et que les fonctions soient introuvables parce que la décoration n'est pas la bonne... La première étape est de trouver d'où viennent ces fonctions.