Discussion :

[adouville]

Bonjour,
Surement une question bête; mais je suis quelque peu démuni...

J'utilise un script TCL dans lequel la commande fileevent est utilisée:

Code :

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

1
2
3
4
5
6
7
8
9
 
proc get_subversion_revision { file_name } {
  [traitement a faire]
  fileevent $input readable [list get_revision_info $input ]
  [traitement a faire]
}
proc get_revision_info { inp  } {
  [traitement a faire]
}

Lorsque je lance le script via mon terminal: "tclsh svn_revision.tcl ."; tout est OK.
Lorsque je crée un Makefile avec cette commande:

Code :

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

1
2
toto:
	tclsh svn_revision.tcl .

la procédure 'get_revision_info' est entrée avec un argument nul (et donc le script ne génère aucun traitement)
Je ne comprends pas pourquoi il y a cet argument nul... D'autant plus que lorsque j'utilise une autre commande (le paramètre 'input' du filevent), l'argument n'est pas nul...
Pourriez-vous me dire si cela vient de mon script TCL ou du Makefile?
Merci beaucoup!

[hanselmault]

Je ne saurais dire d’où ça vient au juste. Avez vous essayé avec une variable globale? Au cas où ...