Discussion :

[dandan8701]

Bonjour,

J'ai un fichier Fortran que je dois compiler et j'ai ce message d'erreur que je n'arrive pas à résoudre :

In file kennet.f:825

ASSIGN 28 TO NSTAT
1
Warning: Obsolete: ASSIGN statement at (1)
In file kennet.f:848

GO TO NSTAT (28,29)
1
Warning: Obsolete: Assigned GOTO statement at (1)
In file kennet.f:850

ASSIGN 29 TO NSTAT
1
Warning: Obsolete: ASSIGN statement at (1)
In file kennet.f:889

write(6,*)icx,icy,icz,dep(i),alp(i),bet(i),rh(i),i,nlay,'*
1
Error: Unterminated character constant beginning at (1)

Merci d'avance

[john stedd]

bonjour,

déjà, le compilateur que tu utilises t'annonce que ASSIGN est obsolète (quel compilateur? quelles options de compilation? quel environnement?)
d'autre part, le GOTO est à éviter (hormis de très rares cas où il peut s'avérer indispensable). visiblement, ce que tu as ici c'est un vieux code à mettre à jour, ou un truc du genre...

à la fin du write, il y a un '* qui à mon avis est la source de l'erreur

[genteur slayer]

salut,

est-ce que tu sais comment il a été compilé avant qu'il ne te tombe dans les mains???

en tout cas, pour ton write, quel est la ligne complète (j'imagine que le message d'erreur a tronqué la fin de la ligne)

quant à l'instruction GOTO, je suis d'accord que c'est obsolète mais ils ne va pas ré-écrite tout le code pour le viré si c'est un code récupéré... donc fo faire avec...

le coup du compilo qui te dit cela c'est que tu doit avoir un compilo qui n'accepet que les normes 90/95(/2003) il faut donc le forcer à regarder du 77... ou bien changer de compilo...

quel est le type de machine, et quel compilo tu as utiliser et... qu'à tu comme autre compilo sous la main?