| N° |
Fonction |
Catégorie |
Version |
| BIS 14 |
BiS_NotEmpty |
Gestion de Chaînes |
1.0 - Janvier 2007 |
Description
|
But
|
Teste si un élément est une chaîne non vide
|
|
Prototype
|
(BiS_NotEmpty Elément)
|
|
Argument
|
Elément - L’élément à analyser - quelconque -
|
|
Retours
|
Nil ou T
|
|
Var. globales
|
Néant
|
|
Description
|
Vérifie si l’élément à tester est une chaîne, et si oui, si elle n’est pas vide.
|
|
Notes
|
|
|
Exemples
|
Command: (BiS_NotEmpty "azerty")
retourne T
Command: (BiS_NotEmpty "")
retourne nil
Command: (setq text1 "Texte"
text2 "")
Command: (BiS_NotEmpty text1)
retourne T
Command: (BiS_NotEmpty text2)
retourne nil
Command: (BiS_NotEmpty text3)
retourne nil
text3 n’existe pas.
Command: (setq LL '(1 2))
Command: (BiS_NotEmpty LL)
retourne nil
LL n’est pas une chaîne.
|
La fonction
1- (defun BiS_NotEmpty (*Text1)
2- (and (= (type *Text1) 'STR)
3- (/= *Text1 "")
4- )
5- )
Ligne 2 : Si l’argument *Text1 est une chaîne,
Ligne 3 : et si cet argument n’esp pas vide
Ligne 5 : Retourne T, sinon nil.
Type : Renvoie le type de l'élément spécifié.
