rpl/src/instructions_p8.c - diff

Return to instructions_p8.c CVS log

Up to [local] / rpl / src

version 1.24, 2014/04/25 07:37:32	version 1.30, 2015/06/08 14:11:39
Line 1	Line 1
/*	/*
================================================================================	================================================================================
RPL/2 (R) version 4.1.18	RPL/2 (R) version 4.1.22
Copyright (C) 1989-2014 Dr. BERTRAND Joël	Copyright (C) 1989-2015 Dr. BERTRAND Joël

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

Line 224 instruction_poll(struct_processus *s_eta	Line 224 instruction_poll(struct_processus *s_eta

case CHN:	case CHN:
{	{
if ((registre = conversion_majuscule((unsigned char *)	if ((registre = conversion_majuscule(s_etat_processus,
((l_element_courant_2).donnee).objet))	(unsigned char ) ((*l_element_courant_2)
== NULL)	.donnee).objet)) == NULL)
{	{
(*s_etat_processus).erreur_systeme =	(*s_etat_processus).erreur_systeme =
d_es_allocation_memoire;	d_es_allocation_memoire;