aplat

Documents structurés pour Unix
git clone git://git.asteride.xyz/~ldp/aplat.git
Journaux | Fichiers | Références | LISEZ-MOI | LICENCE

commit 5a237814c442e3d28d88778ec83889311ec80d33
parent 2737a2f8f21a2b0f270dd56e372ce6f3532a12ae
Auteur: Selve <selve@asteride.xyz>
Date:   Sun, 21 Jan 2024 13:46:33 -0500

ajout d'une condition d'erreur

Les caractères qui suivaient la dernière parenthèses fermante étaient ignorés.
Ce n'est plus le cas. Seuls les caractères blancs y sont permis.

Les traductions ont aussi été modifiées.

Diffstat:
Maplat.c | 17++++++++++++++---
Mpo/ca.po | 11++++++++---
Mpo/en.po | 11++++++++---
Mpo/es.po | 11++++++++---
Mpo/modele.pot | 11++++++++---
5 files changed, 46 insertions(+), 15 deletions(-)

diff --git a/aplat.c b/aplat.c @@ -73,6 +73,7 @@ static int transformer(FILE *f) { int prfd; /* profondeur */ int draps; /* drapeaux */ + int c; assert(f != NULL); @@ -87,7 +88,7 @@ static int transformer(FILE *f) default: fprintf(stderr, _("%s: le premier caractère non blanc " - "doit être « ( »\n"), + "doit être « ( »\n"), nom_prog); return -1; } @@ -137,14 +138,14 @@ ctn: ferm: if (--prfd == 0) - return 0; + goto fin; assert(prfd > 0); while (tp_etq_rec(&etq) != ETQ_SEP_REL) { draps |= DRAP_FRM; afficher_ligne(&etq, &ctn, &draps); if (--prfd == 0) - return 0; + goto fin; } switch (prch_jeton(f, &ctn, TP_TYPE_CTN)) { @@ -161,6 +162,16 @@ ferm: } assert(0); +fin: + while ((c = getc(f)) == ' ' || c == '\n' || c == '\t') + ; + if (c == EOF) + return 0; + fprintf(stderr, _("%s: aucun caractère non blanc ne peut suivre " + "le dernier « ) »\n"), + nom_prog); + return -1; + deseq: fprintf(stderr, _("%s: parenthèses déséquilibrées\n"), nom_prog); return -1; diff --git a/po/ca.po b/po/ca.po @@ -7,7 +7,7 @@ msgid "" msgstr "" "Project-Id-Version: PAQUET VERSION\n" "Report-Msgid-Bugs-To: \n" -"POT-Creation-Date: 2024-01-21 12:55-0500\n" +"POT-Creation-Date: 2024-01-21 13:34-0500\n" "PO-Revision-Date: 2024-01-21 09:38-0500\n" "Last-Translator: Selve <selve@asteride.xyz>\n" "Language: ca\n" @@ -21,12 +21,17 @@ msgstr "" msgid "Utilisation: %s <[fichier]\n" msgstr "Forma d’ús: %s <[fitxer]\n" -#: aplat.c:89 +#: aplat.c:90 #, c-format msgid "%s: le premier caractère non blanc doit être « ( »\n" msgstr "%s: el primer caràcter no-blanc ha de ser «(»\n" -#: aplat.c:165 +#: aplat.c:170 +#, c-format +msgid "%s: aucun caractère non blanc ne peut suivre le dernier « ) »\n" +msgstr "%s: cap caràcter no-blanc pot seguir l'últim «)»\n" + +#: aplat.c:176 #, c-format msgid "%s: parenthèses déséquilibrées\n" msgstr "%s: parèntesis sense tencar\n" diff --git a/po/en.po b/po/en.po @@ -7,7 +7,7 @@ msgid "" msgstr "" "Project-Id-Version: PAQUET VERSION\n" "Report-Msgid-Bugs-To: \n" -"POT-Creation-Date: 2024-01-21 12:55-0500\n" +"POT-Creation-Date: 2024-01-21 13:34-0500\n" "PO-Revision-Date: 2024-01-21 12:36-0500\n" "Last-Translator: Selve <selve@asteride.xyz>\n" "Language: en\n" @@ -21,12 +21,17 @@ msgstr "" msgid "Utilisation: %s <[fichier]\n" msgstr "Usage: %s <[file]\n" -#: aplat.c:89 +#: aplat.c:90 #, c-format msgid "%s: le premier caractère non blanc doit être « ( »\n" msgstr "%s: the first non-whitespace character must be \"(\"\n" -#: aplat.c:165 +#: aplat.c:170 +#, c-format +msgid "%s: aucun caractère non blanc ne peut suivre le dernier « ) »\n" +msgstr "%s: no non-whitespace character can follow le last \"(\"\n" + +#: aplat.c:176 #, c-format msgid "%s: parenthèses déséquilibrées\n" msgstr "%s: unbalanced parenthesis\n" diff --git a/po/es.po b/po/es.po @@ -7,7 +7,7 @@ msgid "" msgstr "" "Project-Id-Version: PAQUET VERSION\n" "Report-Msgid-Bugs-To: \n" -"POT-Creation-Date: 2024-01-21 12:55-0500\n" +"POT-Creation-Date: 2024-01-21 13:34-0500\n" "PO-Revision-Date: 2024-01-21 12:13-0500\n" "Last-Translator: Selve <selve@asteride.xyz>\n" "Language: es\n" @@ -21,12 +21,17 @@ msgstr "" msgid "Utilisation: %s <[fichier]\n" msgstr "Modo de empleo: %s <[fichero]\n" -#: aplat.c:89 +#: aplat.c:90 #, c-format msgid "%s: le premier caractère non blanc doit être « ( »\n" msgstr "%s: el primer carácter que no es espacio en blanco debe ser « ( »\n" -#: aplat.c:165 +#: aplat.c:170 +#, c-format +msgid "%s: aucun caractère non blanc ne peut suivre le dernier « ) »\n" +msgstr "%s: ningún carácter no blanco puede seguir el último «(»\n" + +#: aplat.c:176 #, c-format msgid "%s: parenthèses déséquilibrées\n" msgstr "%s: «(» sin pareja\n" diff --git a/po/modele.pot b/po/modele.pot @@ -7,7 +7,7 @@ msgid "" msgstr "" "Project-Id-Version: PAQUET VERSION\n" "Report-Msgid-Bugs-To: \n" -"POT-Creation-Date: 2024-01-21 12:55-0500\n" +"POT-Creation-Date: 2024-01-21 13:34-0500\n" "PO-Revision-Date: AAAA-MM-JJ HH:MM+FUSEAU\n" "Last-Translator: PRÉNOM NOM <ADRESSE@COURRIEL>\n" "Language-Team: LANGUE <LL@DOMAINE>\n" @@ -21,12 +21,17 @@ msgstr "" msgid "Utilisation: %s <[fichier]\n" msgstr "" -#: aplat.c:89 +#: aplat.c:90 #, c-format msgid "%s: le premier caractère non blanc doit être « ( »\n" msgstr "" -#: aplat.c:165 +#: aplat.c:170 +#, c-format +msgid "%s: aucun caractère non blanc ne peut suivre le dernier « ) »\n" +msgstr "" + +#: aplat.c:176 #, c-format msgid "%s: parenthèses déséquilibrées\n" msgstr ""