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.32 and 1.49

version 1.32, 2011/06/20 17:54:21	version 1.49, 2012/01/25 16:38:30
Line 1	Line 1
/*	/*
================================================================================	================================================================================
RPL/2 (R) version 4.1.0.prerelease.1	RPL/2 (R) version 4.1.6
Copyright (C) 1989-2011 Dr. BERTRAND Joël	Copyright (C) 1989-2012 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 1277 messages(struct_processus *s_etat_proces	Line 1277 messages(struct_processus *s_etat_proces
}	}
else	else
{	{
chaine = "+Erreur : Cannot create global variable";	chaine = "+++Error : Cannot create global variable";
	}

	break;
	}

	case d_ex_erreur_interne_rplcas :
	{
	if ((*s_etat_processus).langue == 'F')
	{
	chaine = "+++Erreur : Erreur interne RPL/CAS";
	}
	else
	{
	chaine = "+++Error : Internal RPL/CAS error";
	}

	break;
	}

	case d_ex_fichier_corrompu :
	{
	if ((*s_etat_processus).langue == 'F')
	{
	chaine = "+++Erreur : Fichier corrompu";
	}
	else
	{
	chaine = "+++Error : Corrupted file";
	}

	break;
	}

	case d_ex_mutex_acquis_autre_thread :
	{
	if ((*s_etat_processus).langue == 'F')
	{
	chaine = "+++Erreur : Mutex acquis par un autre thread";
	}
	else
	{
	chaine = "+++Error : Mutex owned by another thread";
	}

	break;
	}

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

break;	break;
Line 1287 messages(struct_processus *s_etat_proces	Line 1343 messages(struct_processus *s_etat_proces
{	{
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 1545 messages(struct_processus *s_etat_proces	Line 1601 messages(struct_processus *s_etat_proces
break;	break;
}	}

	case d_es_mutex_acquis_autre_thread :
	{
	if ((*s_etat_processus).langue == 'F')
	{
	chaine = "+++Système : Mutex acquis par un autre thread";
	}
	else
	{
	chaine = "+++System : Mutex owned by another thread";
	}

	break;
	}

case -1 : // Fonction externe	case -1 : // Fonction externe
{	{
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.32
changed lines
	Added in v.1.49