Communauté Eggdrop

Version complète : créer une variable constante
Vous consultez actuellement la version basse qualité d’un document. Voir la version complète avec le bon formatage.
voici un petit script tout simple qui pourrait intéresser certain d'entre vous
Il sert à créer des variables constantes, c'est à dire qu'une foi créées elles ne peuvent être ni modifiées ni unset (read only)

j'ai écrit ce script d'après une source du wiki tcl.tk:
http://wiki.tcl.tk/1734

utilisation:
sourcer le fichier
namespace import ::const::*
const varName value
exemple:
tcl
const mavar 10


Code :
% const mavar 10
10
% set mavar 11
can't set "mavar": read-only variable
% return $mavar
10