rpl/src/messages.c - diff

Return to messages.c CVS log

Up to [local] / rpl / src

Diff for /rpl/src/messages.c between versions 1.45 and 1.61

version 1.45, 2011/11/26 13:05:03	version 1.61, 2013/02/26 19:56:17
Line 1	Line 1
/*	/*
================================================================================	================================================================================
RPL/2 (R) version 4.1.5	RPL/2 (R) version 4.1.12
Copyright (C) 1989-2011 Dr. BERTRAND Joël	Copyright (C) 1989-2013 Dr. BERTRAND Joël

This file is part of RPL/2.	This file is part of RPL/2.

Line 86 messages(struct_processus *s_etat_proces	Line 86 messages(struct_processus *s_etat_proces
if ((*s_etat_processus).langue == 'F')	if ((*s_etat_processus).langue == 'F')
{	{
chaine ="+++Erreur : Arguments insuffisants pour la "	chaine ="+++Erreur : Arguments insuffisants pour la "
"commande %s";	"commande '%s'";
argument = (*s_etat_processus).instruction_derniere_erreur;	argument = (*s_etat_processus).instruction_derniere_erreur;
}	}
else	else
{	{
chaine = "+++Error : Too few arguments for %s "	chaine = "+++Error : Too few arguments for '%s' "
"command";	"command";
argument = (*s_etat_processus).instruction_derniere_erreur;	argument = (*s_etat_processus).instruction_derniere_erreur;
}	}
Line 104 messages(struct_processus *s_etat_proces	Line 104 messages(struct_processus *s_etat_proces
if ((*s_etat_processus).langue == 'F')	if ((*s_etat_processus).langue == 'F')
{	{
chaine = "+++Erreur : Argument invalide pour la "	chaine = "+++Erreur : Argument invalide pour la "
"commande %s";	"commande '%s'";
argument = (*s_etat_processus).instruction_derniere_erreur;	argument = (*s_etat_processus).instruction_derniere_erreur;
}	}
else	else
{	{
chaine = "+++Error : Invalid argument for "	chaine = "+++Error : Invalid argument for "
"%s command";	"'%s' command";
argument = (*s_etat_processus).instruction_derniere_erreur;	argument = (*s_etat_processus).instruction_derniere_erreur;
}	}

Line 138 messages(struct_processus *s_etat_proces	Line 138 messages(struct_processus *s_etat_proces
if ((*s_etat_processus).langue == 'F')	if ((*s_etat_processus).langue == 'F')
{	{
chaine = "+++Erreur : Type d'argument invalide pour la "	chaine = "+++Erreur : Type d'argument invalide pour la "
"commande %s";	"commande '%s'";
argument = (*s_etat_processus).instruction_derniere_erreur;	argument = (*s_etat_processus).instruction_derniere_erreur;
}	}
else	else
{	{
chaine = "+++Error : Invalid argument type for "	chaine = "+++Error : Invalid argument type for "
"%s command";	"'%s' command";
argument = (*s_etat_processus).instruction_derniere_erreur;	argument = (*s_etat_processus).instruction_derniere_erreur;
}	}

Line 174 messages(struct_processus *s_etat_proces	Line 174 messages(struct_processus *s_etat_proces
if ((*s_etat_processus).langue == 'F')	if ((*s_etat_processus).langue == 'F')
{	{
chaine = "+++Erreur : Dimensions invalides pour "	chaine = "+++Erreur : Dimensions invalides pour "
"l'instruction %s";	"l'instruction '%s'";
argument = (*s_etat_processus).instruction_derniere_erreur;	argument = (*s_etat_processus).instruction_derniere_erreur;
}	}
else	else
{	{
chaine = "+++Erreur : Invalid dimensions for "	chaine = "+++Erreur : Invalid dimensions for "
"%s instruction";	"'%s' instruction";
argument = (*s_etat_processus).instruction_derniere_erreur;	argument = (*s_etat_processus).instruction_derniere_erreur;
}	}

Line 191 messages(struct_processus *s_etat_proces	Line 191 messages(struct_processus *s_etat_proces
{	{
if ((*s_etat_processus).langue == 'F')	if ((*s_etat_processus).langue == 'F')
{	{
chaine = "+++Erreur : Expression %s invalide";	chaine = "+++Erreur : Expression '%s' invalide";
argument = (*s_etat_processus).instruction_derniere_erreur;	argument = (*s_etat_processus).instruction_derniere_erreur;
}	}
else	else
{	{
chaine = "+++Error : Invalid %s expression";	chaine = "+++Error : Invalid '%s' expression";
argument = (*s_etat_processus).instruction_derniere_erreur;	argument = (*s_etat_processus).instruction_derniere_erreur;
}	}

Line 717 messages(struct_processus *s_etat_proces	Line 717 messages(struct_processus *s_etat_proces
if ((*s_etat_processus).langue == 'F')	if ((*s_etat_processus).langue == 'F')
{	{
chaine = "+++Erreur : Erreur interne dans la routine"	chaine = "+++Erreur : Erreur interne dans la routine"
" mathématique %s";	" mathématique '%s'";
argument = (*s_etat_processus).instruction_derniere_erreur;	argument = (*s_etat_processus).instruction_derniere_erreur;
}	}
else	else
{	{
chaine = "+++Error : Internal error in mathematical"	chaine = "+++Error : Internal error in mathematical"
" subroutine %s";	" subroutine '%s'";
argument = (*s_etat_processus).instruction_derniere_erreur;	argument = (*s_etat_processus).instruction_derniere_erreur;
}	}

Line 1325 messages(struct_processus *s_etat_proces	Line 1325 messages(struct_processus *s_etat_proces
break;	break;
}	}

	case d_ex_expression_reguliere :
	{
	if ((*s_etat_processus).langue == 'F')
	{
	chaine = "+++Erreur : Expression régulière";
	}
	else
	{
	chaine = "+++Error : Regular expression";
	}

	break;
	}

	case d_ex_instruction_indisponible :
	{
	if ((*s_etat_processus).langue == 'F')
	{
	chaine = "+++Erreur : Instruction intrinsèque non "
	"disponible";
	}
	else
	{
	chaine = "+++Error : Unavailable intrinsic instruction";
	}

	break;
	}

	case d_ex_chiffrement :
	{
	if ((*s_etat_processus).langue == 'F')
	{
	chaine = "+++Erreur : Erreur dans les routines "
	"de chiffrement";
	}
	else
	{
	chaine = "+++Error : Cipher error";
	}

	break;
	}

	case d_ex_chiffrement_indisponible :
	{
	if ((*s_etat_processus).langue == 'F')
	{
	chaine = "+++Erreur : Algorithme de chiffrement "
	"indisponible";
	}
	else
	{
	chaine = "+++Error : Unavailable cipher algorithm";
	}

	break;
	}

	case d_ex_longueur_clef_chiffrement :
	{
	if ((*s_etat_processus).langue == 'F')
	{
	chaine = "+++Erreur : Longueur invalide de la clef "
	"de chiffrement";
	}
	else
	{
	chaine = "+++Error : Invalide key length";
	}

	break;
	}

case -1 : // Fonction externe	case -1 : // Fonction externe
{	{
if ((*s_etat_processus).langue == 'F')	if ((*s_etat_processus).langue == 'F')
{	{
chaine = "+++Erreur : Fonction dynamique %s (ligne %lld)";	chaine = "+++Erreur : Fonction dynamique '%s' (ligne %lld)";
argument = (*s_etat_processus).instruction_derniere_erreur;	argument = (*s_etat_processus).instruction_derniere_erreur;
erreur_fonction_externe = d_vrai;	erreur_fonction_externe = d_vrai;
}	}
else	else
{	{
chaine = "+++Error : %s dynamic function (line %lld)";	chaine = "+++Error : '%s' dynamic function (line %lld)";
argument = (*s_etat_processus).instruction_derniere_erreur;	argument = (*s_etat_processus).instruction_derniere_erreur;
erreur_fonction_externe = d_vrai;	erreur_fonction_externe = d_vrai;
}	}
Line 1605 messages(struct_processus *s_etat_proces	Line 1679 messages(struct_processus *s_etat_proces
{	{
if ((*s_etat_processus).langue == 'F')	if ((*s_etat_processus).langue == 'F')
{	{
chaine = "+++Système : Fonction dynamique %s (ligne %lld)";	chaine = "+++Système : Fonction dynamique '%s' "
	"(ligne %lld)";
argument = (*s_etat_processus).instruction_derniere_erreur;	argument = (*s_etat_processus).instruction_derniere_erreur;
erreur_fonction_externe = d_vrai;	erreur_fonction_externe = d_vrai;
}	}
else	else
{	{
chaine = "+++System : %s dynamic function (line %lld)";	chaine = "+++System : '%s' dynamic function (line %lld)";
argument = (*s_etat_processus).instruction_derniere_erreur;	argument = (*s_etat_processus).instruction_derniere_erreur;
erreur_fonction_externe = d_vrai;	erreur_fonction_externe = d_vrai;
}	}

CVSweb interface <joel.bertrand@systella.fr>

Removed from v.1.45
changed lines
	Added in v.1.61