Discussion :

[Sphost]

Bonjour à tous,

Contexte :
Depuis un projet codé en C++ sous une plateforme linux, je fais appel à une fonction en Fortran.
J'utilise ifort (compilateur intel) pour compiler la librairie contenant ma fonction Fortran et g++ pour compiler le code en C++ et linker le tout.

Problème :
Je souhaite au sein de ce code Fortran avoir un appel à une fonction équivalent à ERRSET (utilisé en Fortran VMS).
Le comportement recherché étant en cas d'exception arithmetic, d'avoir une trace dans un fichier mais que le traitement continu normalement.

Merci d'avance pour vos idées.

[afrancisco]

Salut,

Je n'ai jamais utilisé le traitement des exceptions mais il me semble que ton problème doit trouver une solution ici :http://www.codiciel.fr/compilateur/fortran2003.pdf
C'est un résumé des apports f2003, et si cela répond à tes attentes, tu as un cours plus complet ici :
http://www.idris.fr/data/cours/lang/...rtran_2003.pdf

ensuite, est-ce que ifort intègre ces fonctionnalités ?...

[Sphost]

Après de multiples recherches j'ai réussi à obtenir le comportement suivant :
Je positionne mon Flag FPE pour qu'une exception FPE soit levée :

Code :

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

CALL FOR_SET_FPE(CODE)

J'affecte ensuite un handler à un signal de type FPE

Code :

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

CALL PXFSIGACTION(SIGFPE,jaction,joaction,pxferr)

Les signaux FPE sont bien trappés, mais quand j'arrive dans mon handler de signaux, je suis incapable de savoir quelle erreur FPE a été levée (Division par zéro, Overflow, etc ...).
Je pourrais utiliser plutôt la fonction IEEE_HANDLER qui me permet de créer également un handler pour les exceptions FPE et avec laquelle je peux savoir quelle erreur a été levée mais le problème de cette fonction c'est que le programme se termine à la fin de la fonction handler, sans possibilité de trapper le signal en aval ...

Si quelqu'un a une idée ?