Pedro
Nombre de messages : 1596
Date d'inscription : 19/01/2014
 | | Sujet: Nouvelle erreur du compilateur. Jeu 3 Aoû 2017 - 20:43 | |
| Bonsoir. @Jack Je voulais te signaler une nouvelle erreur du compilateur, avec le code ci-dessous. Le message d'erreur étant le suivant:
if without corresponding end_if line...Le n° de ligne signalé étant celui de la ligne suivant le dernier 'end_if', soit une ligne vide !! - Code:
-
if (type_mot$="ms->mp" or type_mot$="fs->fp" or right$(trim$(traduction_mot$),2)="p)") and instr("*"+car$+"*las*los*les*des*les(ms)*les(mp)*","*"+mot_precedent$(1)+"*")=0 and mot_precedent$(1)<>car$+"ces"
res%=0
if instr(traduction_mot$,"(adv)")+instr(traduction_mot$,"(conj)")+instr(traduction_mot$,"(prép)")=0
if right$(traduction_mot$,4)="(ms)" then temporaire$="(ms)":traduction_mot$=trim$(left$(traduction_mot$,len(traduction_mot$)-4))
if right$(traduction_mot$,4)="(mp)" then temporaire$="(mp)":traduction_mot$=trim$(left$(traduction_mot$,len(traduction_mot$)-4))
if right$(traduction_mot$,4)="(fs)" then temporaire$="(fs)":traduction_mot$=trim$(left$(traduction_mot$,len(traduction_mot$)-4))
if right$(traduction_mot$,4)="(fp)" then temporaire$="(fp)":traduction_mot$=trim$(left$(traduction_mot$,len(traduction_mot$)-4))
if right$(traduction_mot$,3)="(n)" then temporaire$="(n)":traduction_mot$=trim$(left$(traduction_mot$,len(traduction_mot$)-3))
determiner_pluriel_nom_francais(traduction_mot$)
traduction_mot$=pluriel_nom_francais$
if temporaire$="(ms)"
traduction_mot$=traduction_mot$+"(mp)"
else
if temporaire$="(fs)"
traduction_mot$=traduction_mot$+"(fp)"
else
if temporaire$="(n)" then traduction_mot$=traduction_mot$+"(np)"
end_if
end_if
end_if
' Corrections: on enlève le 's' final éventuel.
if right$(traduction_mot$,2)=")s" then traduction_mot$=left$(traduction_mot$,len(traduction_mot$)-1)
if instr(traduction_mot$,"(adv)")+instr(traduction_mot$,"(conj)")+instr(traduction_mot$,"(prép)")=0
if mot_precedent$(1)<>car$+"les(adj)" and mot_precedent$(1)<>"my" and traduction_mot$<>"dans" and left$(traduction_mot$,15)<>"Ne pas traduire"
chaine2$="Faut-il ajouter l'article 'les' ou 'des' devant le mot '"+traduction_mot$+"' ?"+crlf$
chaine2$=chaine2$+"Dans la phrase:"+crlf$+"'"+phrase$+"'."
nombre_sens%=3
sens$(1)="les"
sens$(2)="des"
sens$(3)="aucun"
message(5,1,chaine2$)
if resultat$<>"aucun" then traduction_mot$=car$+resultat$+" "+traduction_mot$
end_if
end_if
end_if
| |
|
Calendrier