05/01/2009, 14:27
Salut Gro_MiNet
comment va depuis le temps??
déjà tu as une erreure a cette ligne (je pense)
ca ne devrais pas étres plutot sans le S de exempt_masks
(je ne pense pas que l erreur vienne de la)
ensuite tu devrais close les fichier avant de return 0 sinon au bou de 50 notice il y auras 50 fichiers ouvert ou tu peu remplacer le return 0 par un break (qui a pour effet de stopper la boucle et continue de lire la suite de la procédure)
l'idée de Merwin est pas mal du tout mais cela ne vient pas de la. \n signifie un retour a la ligne ("putlog 1\n2" renvera 2 ligne "1 et 2")
j pense que tu devrais ajouter des putlog et return a chaque condition pour voir ou le tcl se bloque (que tu deplacera au fur et a mesure)
le return aura pour effet d arreter la proc donc tu le place au debut, tu test et si ca marche tu le deplace dans la contition suivante.
comment va depuis le temps??
déjà tu as une erreure a cette ligne (je pense)
tcl
if {$exempt_masks != ""} {
ca ne devrais pas étres plutot sans le S de exempt_masks
tcl
if {$exempt_mask != ""} {
(je ne pense pas que l erreur vienne de la)
ensuite tu devrais close les fichier avant de return 0 sinon au bou de 50 notice il y auras 50 fichiers ouvert ou tu peu remplacer le return 0 par un break (qui a pour effet de stopper la boucle et continue de lire la suite de la procédure)
l'idée de Merwin est pas mal du tout mais cela ne vient pas de la. \n signifie un retour a la ligne ("putlog 1\n2" renvera 2 ligne "1 et 2")
j pense que tu devrais ajouter des putlog et return a chaque condition pour voir ou le tcl se bloque (que tu deplacera au fur et a mesure)
tcl
putlog ok
returnle return aura pour effet d arreter la proc donc tu le place au debut, tu test et si ca marche tu le deplace dans la contition suivante.
C'est en reconnaissant ses erreurs que l'on progresse 