tef-innu

commit ae7e2517a18823e7517dac8a68208151d47b8faf
parent f7396b03207a9a84cc18345769514a960e8757ba
Auteur: Loïc Daignault-Pichette <loic@asteride.xyz>
Date:   Mon,  1 Sep 2025 21:09:50 -0400

[sty] Restructurer la cascade de compositions

Les transducteurs sont composés plus au fur et à mesure.

Diffstat:
M
verbes/verbes.xfst
 | 
24
++++++++++--------------

1 fichier modifié, 10 insertions(+), 14 suppressions(-)
diff --git a/verbes/verbes.xfst b/verbes/verbes.xfst
@@ -18,9 +18,9 @@ define Voy       [VoyCourte|VoyLongue];
 # LEXIQUE
 # -------
 
-define LexVAI @txt"verbes/lexvai.lst";
-define LexVII @txt"verbes/lexvii.lst";
-define LexVTI @txt"verbes/lexvti.lst";
+define LexVAI @txt"verbes/lexvai.lst" "+VAI";
+define LexVII @txt"verbes/lexvii.lst" "+VII";
+define LexVTI @txt"verbes/lexvti.lst" "+VTI";
 
 # ------
 # TRAITS
@@ -49,7 +49,7 @@ define CombTraitsPart TPers TNb (TInc) (TObv)
         # Le contraste d’obviation est obligatoire à la troisième personne.
         & ~[$["+3"] & ~$[TObv]];
 
-define CombTraits TVrbe CombTraitsPart ("->" CombTraitsPart)
+define CombTraits [LexVAI|LexVII|LexVTI] CombTraitsPart ("->" CombTraitsPart)
         # Seuls les VTA encodent deux participants.
         & ~[$["->"] & ~$["+VTA"]]
         # Les VTA encodent toujours deux participants.
@@ -92,9 +92,9 @@ define MNb    ["+1Pl"|"+2Pl"|"+3Pl"|"+ObvPl"|"+ObvSg"]; # Nombre
 
 define Morphemes [MPPers|MTh|MSPers|MNb];
 
-define CombMorphemes [
+define CombMorphemes CombTraits
         # Préfixes de personne
-            [[..] -> "1+" || .#. _ ?* "+1" ,,
+        .o. [[..] -> "1+" || .#. _ ?* "+1" ,,
              [..] -> "2+" || .#. _ ?* "+2"]
         # Thèmes
         .o. [[..] -> "+ThLoc"  || "+VTI" ?* _ ["+1"|"+2"] ,,
@@ -113,8 +113,7 @@ define CombMorphemes [
         .o. ["1+" -> "2+" || _ ?* "+Inc" ,,
              ["+Ex"|"+Inc"] -> []]
         # Retirer les traits inutiles
-        .o. [[TVrbe|"+Sg"|"+Obv"|"+Ntr"] -> []]
-        ];
+        .o. [[TVrbe|"+Sg"|"+Obv"|"+Ntr"] -> []];
 
 # ------------
 # RÉALISATIONS
@@ -172,19 +171,16 @@ define RNbVII [
 # VERBES
 # ------
 
-define VerbesVAI LexVAI [CombTraits .o. $["+VAI"]]
-        .o. CombMorphemes
+define VerbesVAI [$["+VAI"] .o. CombMorphemes]
         .o. RPPers
         .o. RSPersVAI
         .o. RNb;
 
-define VerbesVII LexVII [CombTraits .o. $["+VII"]]
-        .o. CombMorphemes
+define VerbesVII [$["+VII"] .o. CombMorphemes]
         .o. RSPersVII
         .o. RNbVII;
 
-define VerbesVTI LexVTI [CombTraits .o. $["+VTI"]]
-        .o. CombMorphemes
+define VerbesVTI [$["+VTI"] .o. CombMorphemes]
         .o. RPPers
         .o. RTh
         .o. RSPersVTI