Discussion :

[bobo023]

Bonjour à tous,

Je dispose d'un ancien code en fortran (écrit en 90) que j'aimerais faire tourner le plus rapidement possible.

Ça fait quelque jour que j'essaie différent compilateur: intel visual fortran 9.1, gfortran et résultat pour ces deux premiers il y avait des fonctions qui semblaient ne pas être reconnues (GETSCA, MEXERR...).

j'ai alors pensé qu'il fallais prendre un compilateur plus vieux j'ai essayé open Watcom fortran 77 et là presque toutes les erreurs ont disparu mais il me reste plus qu'une erreur avec la syntaxe " %VAL(X) " le compilateur dit que c'est une syntaxe illégale! Pourtant il semble bien qu'elle existe mais n'est pas supportée.

Je travail actuellement sous windows xp est ce cela qui pose problème pour le %VAL() ?? ( le code que j'ai a été écrit sur environnement VMS)

Quelqu'un a -t-il une idée de comment résoudre se problème? Y a -t-il un équivalent de %VAL() qui est supporté par les compilateurs fortran actuels??
Merci de vos réponses

[MABROUKI]

bonjour
En visual compaq fortran 90 comme Intel Fortran 90 c'est une fonction de bibliotheque interne(intrinsic function).
Citation doc visual compaq fortran

Built-in Function: Changes the form of an actual argument. Passes the argument as an immediate value
Syntax
result = %VAL (a)
a
(Input) An expression, record name, procedure name, array, character array section, or array element.
Example
CALL SUB(2, %VAL(2))
Constant 2 is passed by reference. The second constant 2 is passed by immediate value.
Fin Citation doc visual compaq fortran


Permet de passer exceptionnellement un argument par valeur,ce qui est interessant car fortran passe par defaut les arguments par adresse.
Il existe egalement result = %REF (a) qui passe l'argument par reference(mais c'est fait par defaut).
Peut etre as-tu un probleme de syntaxe à verifier ou bien d'inclusion de librairies standard dans les options de projet.

bon code....