Création d'un index
Fonction IndexDesAttributsDe:
Cette fonction crée un index des attributs des balises passées en paramètre.
-
function IndexDesAttributsDe:tags
-
index = {}
-
for tag = tags
-
liste = {}
-
liste += newTagWithName:"src" contents:stringFromContentsOfTag:tag
-
for attribut = allKeysIn:attributesOfTag:tag
-
liste += newTagWithName:attribut
-
contents:attribute:attribut ofTag:tag
-
end
-
index += newTagWithName:(nameOfTag:tag) contents:liste
-
index += "\n"
-
end
-
return index
Lignes 5 à 10: création de la liste des attributs pour une balise. Chaque attribut est transformé en balise (lignes 8 et 9). De plus, une balise <src> est insérée en début de liste contenant le contenu de la balise originale (ligne 6).
Ligne 11: Ajoute à l'index la liste ainsi créée.
Ligne 12: Ajoute un retour de ligne pour créer un fichier plus lisible (une ligne par entrée).
Exemple d'index
<w><src>Lorem</src><lex>Lorus</lex><morph>...</morph></w>
<w><src>ipsum</src><lex>ipse</lex><morph>...</morph></w>
...