rpl/src/instructions_p3.c - diff

Return to instructions_p3.c CVS log

Up to [local] / rpl / src

version 1.17.2.1, 2011/04/11 13:02:23	version 1.30, 2011/11/19 17:53:46
Line 1	Line 1
/*	/*
================================================================================	================================================================================
RPL/2 (R) version 4.0.22	RPL/2 (R) version 4.1.4
Copyright (C) 1989-2011 Dr. BERTRAND Joël	Copyright (C) 1989-2011 Dr. BERTRAND Joël

This file is part of RPL/2.	This file is part of RPL/2.
Line 1377 instruction_pos(struct_processus *s_etat	Line 1377 instruction_pos(struct_processus *s_etat
}	}
else	else
{	{
(((integer8 ) (*s_objet_resultat).objet)) = 1 + (integer8)	(((integer8 ) (*s_objet_resultat).objet)) =
(pointeur_occurrence - ((unsigned char *)	position_caractere_de_chaine(s_etat_processus,
(*s_objet_argument_2).objet));	(unsigned char ) (s_objet_argument_2).objet,
	pointeur_occurrence);
}	}
}	}