rpl/src/bibliotheques_externes.c - diff

Return to bibliotheques_externes.c CVS log

Up to [local] / rpl / src

version 1.77, 2018/05/30 09:27:30	version 1.80, 2019/01/01 09:02:44
Line 1	Line 1
/*	/*
================================================================================	================================================================================
RPL/2 (R) version 4.1.29	RPL/2 (R) version 4.1.30
Copyright (C) 1989-2018 Dr. BERTRAND Joël	Copyright (C) 1989-2019 Dr. BERTRAND Joël

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

Line 376 chargement_bibliotheque(struct_processus	Line 376 chargement_bibliotheque(struct_processus
{	{
if ((fleche = strstr(tableau[i], "->")) != NULL)	if ((fleche = strstr(tableau[i], "->")) != NULL)
{	{
strncpy(fleche, "to", 2);	memcpy(fleche, "to", 2);
(s_etat_processus).s_instructions_externes[(s_etat_processus)	(s_etat_processus).s_instructions_externes[(s_etat_processus)
.nombre_instructions_externes].position_fleche =	.nombre_instructions_externes].position_fleche =
fleche - tableau[i];	fleche - tableau[i];
Line 926 execution_fonction_de_bibliotheque(struc	Line 926 execution_fonction_de_bibliotheque(struc

if ((fleche = strstr(nom_fonction, "->")) != NULL)	if ((fleche = strstr(nom_fonction, "->")) != NULL)
{	{
strncpy(fleche, "to", 2);	memcpy(fleche, "to", 2);
}	}

ordre_iteration = 0;	ordre_iteration = 0;