Des constantes qui varient

Bonjour !

J'ai trouvé dans un programme une écriture comme celle-ci :

Code:

---

1 2 3 4 5 6 7 8 9 10

program exemple;   const i:integer=1;   begin writeln('i=',i);   i:=2; writeln('i=',i); end.

---

8O

Comment se fait-il que le compilateur accepte cela ?
Et quel est l'intérêt de cette déclaration d'une variable comme constante ?

Salut,

C'est une constante typée (ou variable initialisée).

Cela nous permet de déclarer une variable et de l'initialiser. Sa valeur sera trouvera dans le segment de données.

Elle est justifiée dans le code que tu nous montres, car cela évite d'avoir à définir sa valeur initiale i:=1; dans le code.

Koe,

+1, et c'est une des aberrations syntaxiques introduites par Borland.

On aurait pu faire la même chose - initialiser une variable - dans une section Var, et ça n'aurait pas créé cette ambiguïté !

Citation:

---

Envoyé par droggo

Koe,

+1, et c'est une des aberrations syntaxiques introduites par Borland.

On aurait pu faire la même chose - initialiser une variable - dans une section Var, et ça n'aurait pas créé cette ambiguïté !

---

c'est le cas depuis longtemps sous Delphi :)

mais il n'est pas aberrant de typer une constante, par contre par défaut il n'est plus possible de la modifier depuis Delphi 2.

Citation:

---

Constantes typées affectables
Activez cette option pour obtenir une compatibilité avec Delphi 1.0. Si cette option est activée, le compilateur autorise les affectations à des constantes typées. Correspond à {$J}.

---

Tui,

Je sais, mais c'était quand même une aberration, et ça le reste tant qu'on utilise les dinosaures. :)

Salut

Commentaire un peu tardif de ma part.

Cette notation bizarre permet aussi, moyennant quelques acrobaties de programmation, de définir des variables de classe ou des variables statiques.

@+