tef-innu

commit d7382f5a8d5897de5254e539f0da847114867cba
parent a0fc83b3b0dddfa4a94012bc422260fa51d60f27
Auteur: Loïc Daignault-Pichette <loic@asteride.xyz>
Date:   Tue, 16 Sep 2025 15:19:46 -0400

[bog] Corriger l’utilitaire d’ajout

Les troisièmes personnes et les « cinquièmes » personnes n’étaient pas
bien prises en charge.

Diffstat:
M
bib/ajouter_ech.xfst
 | 
27
++++++++++++++-------------

1 fichier modifié, 14 insertions(+), 13 suppressions(-)
diff --git a/bib/ajouter_ech.xfst b/bib/ajouter_ech.xfst
@@ -1,18 +1,19 @@
 clear stack
 
 define Conv ?*
-	.o. [[..] -> [E|O] || .#. _ \[E|O]]
-	.o. [[..] -> {→} || _ .#.]
-	.o. [[..] -> [s|p] || [2|3|4|5|6] _ \[s|p]]
-	.o. [[..] -> "+Obv"  || 4 ~$[s|p] [s|p] _ ,,
-	     [..] -> "+Obv2" || 6 ~$[s|p] [s|p] _ ,,
-	     [..] -> "+Obv3" || 6 ~$[s|p] [s|p] _]
-	.o. [[4|5|6] -> 3]
-	.o. [{→} -> [] || _ .#.]
-	.o. [1 -> "+1" ,, 2 -> "+2" ,, 3 -> "+3"]
-	.o. [s -> "+Sg" ,, p -> "+Pl" ,, e -> "+Ex" ,, i -> "+Inc"]
-	.o. [E -> "+Est" ,, O -> "+Ouest"]
-	.o. [{→} -> "->"]
-	;
+        .o. [[..] -> [E|O] || .#. _ \[E|O]]
+        .o. [[..] -> {→} || _ .#.]
+        .o. [[..] -> [s|p] || [2|3|4|5|6] _ \[s|p]]
+        .o. [[..] -> "+Ntr"  || 3 ~$[s|p] [s|p] _ ,,
+             [..] -> "+Obv"  || 4 ~$[s|p] [s|p] _ ,,
+             [..] -> "+Obv2" || 5 ~$[s|p] [s|p] _ ,,
+             [..] -> "+Obv3" || 6 ~$[s|p] [s|p] _]
+        .o. [[4|5|6] -> 3]
+        .o. [{→} -> [] || _ .#.]
+        .o. [1 -> "+1" ,, 2 -> "+2" ,, 3 -> "+3"]
+        .o. [s -> "+Sg" ,, p -> "+Pl" ,, e -> "+Ex" ,, i -> "+Inc"]
+        .o. [E -> "+Est" ,, O -> "+Ouest"]
+        .o. [{→} -> "->"]
+        ;
 
 push Conv