BOOLEAN |
Booléen |
|---|---|
| Ada | |
Syntaxe
| variable:BOOLEAN; |
Paramètres
| Nom | Description |
|---|---|
| variable | Ce paramètre permet d'indiquer le nom de la variable à créer |
Description
Ce type de données permet d'indiquer des données «Booléen».
Remarques
- Les valeurs acceptés pour ce type de données sont uniquement «True» ou False». Le reste de l'espace que peut contenir la cellule de mémoire contenant ce type de données n'est pas utilisé.
- On peut convertir une valeur entière en un type de données Booléen en utilisant l'attribut «Boolean'POS», laquelle doit être utilisé avec prudence, car elle considère que la valeur 0 vaut faux tandis que toutes les autres valeurs sont vrai.
Exemples
Dans cet exemple, la fonction «fonctionretourneboolean» retourne toujours une valeur vrai :
- WITH TEXT_IO; USE TEXT_IO;
-
- procedure Boolean1Samples is
-
- FUNCTION fonctionretourneboolean RETURN Boolean IS BEGIN
- RETURN True;
- END Fonctionretourneboolean;
-
- begin
- IF(Fonctionretourneboolean)THEN
- PUT_LINE("VRAI");
- END IF;
- end Boolean1Samples;
Voici un exemple montrant comment convertir des booléans en entier (convert bool to int) avec Ada :
- WITH TEXT_IO; USE TEXT_IO;
-
- PROCEDURE Boolean2Samples IS
- a:Boolean;
- b:Integer;
- c:Integer;
- BEGIN
- a := False;
- b := 0;
- c := 1;
- PUT_LINE("Valeur entiere de a = " & Integer'IMAGE(Boolean'POS(a)));
- IF (Boolean'POS(a) = b) THEN
- PUT_LINE("a == b");
- ELSE
- PUT_LINE("a != b");
- END IF;
- IF (Boolean'POS(a) = c) THEN
- PUT_LINE("a == c");
- ELSE
- PUT_LINE("a != c");
- END IF;
- end Boolean2Samples;
on obtiendra le résultat suivant :
Valeur entiere de a = 0a == b
a != c
Dernière mise à jour : Dimanche, le 1er avril 2018