Discussion :

[earl29]

Bonjour,

je suis sur i686. J'utilise gfortran :

Code :

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

1
2
3
4
5
6
7
 
gfortran -v
Utilisation des specs internes.
Cible : i486-linux-gnu
Configuré avec: ../src/configure -v --enable-languages=c,c++,fortran,objc,obj-c++,treelang --prefix=/usr --enable-shared --with-system-zlib --libexecdir=/usr/lib --without-included-gettext --enable-threads=posix --enable-nls --with-gxx-include-dir=/usr/include/c++/4.2 --program-suffix=-4.2 --enable-clocale=gnu --enable-libstdcxx-debug --enable-objc-gc --enable-mpfr --enable-targets=all --enable-checking=release --build=i486-linux-gnu --host=i486-linux-gnu --target=i486-linux-gnu
Modèle de thread: posix
version gcc 4.2.3 (Ubuntu 4.2.3-2ubuntu7)

J'essaye de compiler un vieux programme en fortran 77 (env. 20ans) et j'ai un plantage de la compilation sur l'appel d'un fonction "CALL RENAME" qui aurait trop d'arguments en entrée.
Il semble que gfortran essaye d'utiliser la fonction intrinsèque RENAME qui attend 2 arguments alors que la fonction RENAME est définie dans une autre routine du programme et attend bien 6 arguments comme lors de son appel.

Peut-on spécifier à gfortran d'utiliser les fonctions définies dans les routines du programme et pas les fonctions intrinsèques ? (j'ai aussi le pb avec g77)

Merci

[genteur slayer]

en fait gfortran utilise une librairie libgfortran.a (ou un truc dans le genre )qui contient les fonction principale et intrinsèque donc on ne peut pas désactiver une fonction plutôt qu'une autre...

il n'est généralement pas très malin de nomer une fonction comme une fonction intrinseque...

je te suggère de faire un rechercher/remplacer dans ton code et chage le nom de la fonction (avec un peu de bol cela prend 10sec et hop...)

sinon y des option du syle -fall-intrinsics ou -fmodule-private qui peuvent t'aider mais j'en doute...

essaye avec l'option -std=f77 pour forcer le standard fortran 77 et comme rename n'est que dans les standard suppérieur, avec de la chance, cela peut mercher

[Sylvain Bergeron]

Dans les fonctions / routines / programmes utilisant RENAME, tu dois spécifier que RENAME est external.