Discussion :

[bil31]

bonjour a tous

j'ai un petit pb en fortran 90 je suis dans une boucle do et je dois ouvrir et fermer plusieur fois le meme fichier

alors quand je l'ouvert une premiere fois tout ce passe bien ensuite je le ferme proprement avec un close mais au moment de la reouverture j'ai un segmentation fault
je ne comprend pas pour quoi
merci d'avance

[yogitetradim]

Bonjour,

à première vue ça devrait marcher et sans le code, c'est difficile de voir ce qui peut clocher.
Si tu ouvres et fermes plusieurs fois le même fichier, tu pourrais essayer un rewind(unité_fichier_à_lire) et voir si ça ne fonctionne pas mieux. Le rewind permet de remonter au premier enregistrement de ton fichier sans avoir à le fermer puis le réouvrir.
Bon courage !

[Sylvain Bergeron]

Je suspecte fortement une corruption de mémoire entre la première ouverture et la deuxième... Ce n'est pas le fait de réouvrir le fichier qui provoque l'erreur.

[bil31]

j'utilise deja le rewind mais je suis obliger de le reouvrir
je vois pas comment on peut le corompre etant donner qu'il est en lecture seul je fai que lire dans ce fichier

[Sylvain Bergeron]

Un segmentation fault, c'est que ton programme perd complètement les pédales.

Ce n'est pas le fichier qui est corrompu, mais la mémoire contenant le code d'accès au fichier.

[bil31]

open(1,file='generateur.txt',status='old',action='read',iostat=ierr)
open(2,file='utile.txt',status='old',action='read',iostat=ierr)


do i=1,3
rewind(1)
read(1,*)
read(1,*)
read(1,*,iostat=ierr) typesec,nbsection,res,tem,courant,tension,typecel
open(3,file=typesec,action='read',iostat=ierr)

read(3,*,iostat=ierr) dif
read(3,*,iostat=ierr) m

print*,typesec
close(3)


end do

close(1)
close(2)

voici un bout de mon code mais le rewind ne fonctionne pas correctement typesec ne garde pas la meme valeur l'execution me donne cela

TJ2-10
TJ2-12
Si-1

alors que typesec devrai garder la meme valeur

[Sylvain Bergeron]

read(1,*,iostat=ierr) typesec,nbsection,res,tem,courant,tension,typecel
open(3,file=typesec,action='read',iostat=ierr)

read(3,*,iostat=ierr) dif
read(3,*,iostat=ierr) m

Comment sont déclarées ces différentes variables ? Y-a t'il des pointeurs, des allocatables ? Des vecteurs ?

print*,typesec
...
voici un bout de mon code mais le rewind ne fonctionne pas correctement typesec ne garde pas la meme valeur l'execution me donne cela

TJ2-10
TJ2-12
Si-1

alors que typesec devrai garder la meme valeur

Est-ce bien le résultat du print ? Ces valeurs sont-elles toutes les 3 dans le fichier ?

[bil31]

il n'y a que des character ou des reels. Aucun pointeur ni pointeuse ni vecteur et la partie imprimée est dans le fichier mais c'est le REWIND qui ne marche pas: il ne rembobine pas le fichier.
Comprend tu d'où cela vient il?