rpl/src/instructions_s7.c - diff

Return to instructions_s7.c CVS log

Up to [local] / rpl / src

Diff for /rpl/src/instructions_s7.c between versions 1.44 and 1.73

CVSweb interface <joel.bertrand@systella.fr>

version 1.44, 2013/06/21 14:15:56	version 1.73, 2025/04/15 10:17:55
Line 1	Line 1
/*	/*
================================================================================	================================================================================
RPL/2 (R) version 4.1.15	RPL/2 (R) version 4.1.36
Copyright (C) 1989-2013 Dr. BERTRAND Joël	Copyright (C) 1989-2025 Dr. BERTRAND Joël

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

Line 185 instruction_slicescale(struct_processus	Line 185 instruction_slicescale(struct_processus
{	{
if (((l_element_courant).donnee).type == CHN)	if (((l_element_courant).donnee).type == CHN)
{	{
if ((tampon = conversion_majuscule((unsigned char *)	if ((tampon = conversion_majuscule(s_etat_processus,
((l_element_courant).donnee).objet)) == NULL)	(unsigned char ) ((*l_element_courant).donnee).objet))
	== NULL)
{	{
(*s_etat_processus).erreur_systeme =	(*s_etat_processus).erreur_systeme =
d_es_allocation_memoire;	d_es_allocation_memoire;
Line 553 instruction_sx(struct_processus *s_etat_	Line 554 instruction_sx(struct_processus *s_etat_
return;	return;
}	}

if ((resultat = sommation_colonne_statistique(	if ((resultat = sommation_colonne_statistique(s_etat_processus,
(struct_matrice ) (s_objet_statistique).objet,	(struct_matrice ) (s_objet_statistique).objet,
(*s_etat_processus).colonne_statistique_1)) == NULL)	(*s_etat_processus).colonne_statistique_1)) == NULL)
{	{
Line 718 instruction_sy(struct_processus *s_etat_	Line 719 instruction_sy(struct_processus *s_etat_
return;	return;
}	}

if ((resultat = sommation_colonne_statistique(	if ((resultat = sommation_colonne_statistique(s_etat_processus,
(struct_matrice ) (s_objet_statistique).objet,	(struct_matrice ) (s_objet_statistique).objet,
(*s_etat_processus).colonne_statistique_2)) == NULL)	(*s_etat_processus).colonne_statistique_2)) == NULL)
{	{
Line 886 instruction_sxy(struct_processus *s_etat	Line 887 instruction_sxy(struct_processus *s_etat
}	}

if ((resultat = sommation_produits_colonnes_statistiques(	if ((resultat = sommation_produits_colonnes_statistiques(
	s_etat_processus,
(struct_matrice ) (s_objet_statistique).objet,	(struct_matrice ) (s_objet_statistique).objet,
(*s_etat_processus).colonne_statistique_1,	(*s_etat_processus).colonne_statistique_1,
(*s_etat_processus).colonne_statistique_2)) == NULL)	(*s_etat_processus).colonne_statistique_2)) == NULL)
Line 1052 instruction_sx2(struct_processus *s_etat	Line 1054 instruction_sx2(struct_processus *s_etat
}	}

if ((resultat = sommation_produits_colonnes_statistiques(	if ((resultat = sommation_produits_colonnes_statistiques(
	s_etat_processus,
(struct_matrice ) (s_objet_statistique).objet,	(struct_matrice ) (s_objet_statistique).objet,
(*s_etat_processus).colonne_statistique_1,	(*s_etat_processus).colonne_statistique_1,
(*s_etat_processus).colonne_statistique_1)) == NULL)	(*s_etat_processus).colonne_statistique_1)) == NULL)
Line 1218 instruction_sy2(struct_processus *s_etat	Line 1221 instruction_sy2(struct_processus *s_etat
}	}

if ((resultat = sommation_produits_colonnes_statistiques(	if ((resultat = sommation_produits_colonnes_statistiques(
	s_etat_processus,
(struct_matrice ) (s_objet_statistique).objet,	(struct_matrice ) (s_objet_statistique).objet,
(*s_etat_processus).colonne_statistique_2,	(*s_etat_processus).colonne_statistique_2,
(*s_etat_processus).colonne_statistique_2)) == NULL)	(*s_etat_processus).colonne_statistique_2)) == NULL)

Removed from v.1.44
changed lines
	Added in v.1.73