Discussion :

[genteur slayer]

bonjour à tous,

j'ai un pett soucis pour faire une fonction de log dans mon code... voilà mon soucis, j'ai un message qui peut avoir trois attribut (error, warning ou log) et je l'affiche à l'écran et l'écris dans un fichier... (j'ai trois fichiers correspondant aux attributs...) le seul truc qui ne marche pas c'est sur l'utilisation des 'stdout' et 'stderr' lorsque le message est de type "log" je l'envoie sur la sortie standard écran (stdout, avec le numéro d'unité standard = 6 ) mais lorsque c'est un warning ou une erreur, je voudrais l'envoyer sur stderr (donc dans une console cela revien au même, mais c'est fait pour être utilisé dans un environement graphique qui seppare les deux) sauf que je ne connais pas le numéro d'unité standard de stderr...

donc: quel est le numéro standard de stderr, ou bien comment allé écrire dessus (je précise au fait que le code tourne sous linux ou équivalent)

bonne année à tous!

[yogitetradim]

Un truc qui peut fonctionner sous linux : Déclarer une unité associée à /dev/sterr.

par exemple :

Code :

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

1
2
3
4
5
6
7
 
program Test
implicit none
open(3,file="/dev/stderr")
write(3,*)"Sortie Err"
write(*,*)"Sortie Normale"
end program Test

Une fois compilé, si je teste la commande :

Code :

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

./Test 2>err.out

j'obtiens bien mon message d'erreur dans err.out et mon message standard à l'écran.

Après, j'ai lu à droite à gauche des indications du genre 0 = stderr...mais bon je ne suis pas sûr que ce soit standard.

En esperant que cette réponse te sera utile .

[genteur slayer]

j'ai trouvé une autre solution: il y a trois numéros d'unités qui sont reservés et ne peuvent pas être utilisés pour ouvrire des fichier:
0: stderr
5: sdtin
6: stdout

l'avantage d'utilisé ces numéros c'est que si tu change de système d'exploitation, il n'y a pas besoin de changer le open...

dans ta solution, le "open(unit=3,file="/dev/stderr")" cela marche uniquement sous unix... aparament sous windows c'est "open(unit=3,file="stderr")" dqu'il faut utiliser... sinon, c'est vrai que cela marche parfaitement!!!

merci!!!

[Sylvain Bergeron]

Tu ne dis pas quelle version de Fortran tu utilises, mais si tu utilises un compilateur récent, il est possible que tu puisses utiliser le module intrinsic ISO_FORTRAN_ENV. Ce module est défini par Fortran 2003 et il contient entre autres les variables ERROR_UNIT, INPUT_UNIT et OUTPUT_UNIT (contenant les numéros de unit correspondant).

Si tu utilises un compilateur Fortran 95 ne fournissant pas un tel module, rien ne t'empêche de le créer toi même. Voici à titre d'exemple un tel module pour le compilateur Lahey :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
module ISO_FORTRAN_ENV
 
  ! Nonintrinsic version for Lahey/Fujitsu Fortran for Linux.
  ! See Subclause 13.8.2 of the Fortran 2003 standard.
 
  implicit NONE
  public
 
  integer, parameter :: Character_Storage_Size = 8
  integer, parameter :: Error_Unit = 0
  integer, parameter :: File_Storage_Size = 8
  integer, parameter :: Input_Unit = 5
  integer, parameter :: IOSTAT_END = -1
  integer, parameter :: IOSTAT_EOR = -2
  integer, parameter :: Numeric_Storage_Size = 32
  integer, parameter :: Output_Unit = 6
 
end module ISO_FORTRAN_ENV

Même si le module est Lahey/Linux, il fonctionne très bien sous Windows ainsi qu'avec le compilateur Intel. En utilisant un tel module, tu facilites la portabilité futur de ton code...

[genteur slayer]

je travaille avec gfortran, g95 et/ou ifort (j'essaye de faire en sorte que tout ces compilo ne me renvoie ni erreurs ni warning avec les option de vérification de norme f2003) mais j'ai effectivement crée un module où j'ai défini le numéros d'unités, les routines d'affichage... etc...

il fallait juste que je mette le bon numéro devant "integer, parameter :: Error_Unit ="

tout est nikel maintenant