--- rpl/src/instructions_v1.c 2011/07/24 14:44:10 1.28 +++ rpl/src/instructions_v1.c 2011/09/26 15:57:16 1.33 @@ -1,6 +1,6 @@ /* ================================================================================ - RPL/2 (R) version 4.1.1 + RPL/2 (R) version 4.1.4 Copyright (C) 1989-2011 Dr. BERTRAND Joël This file is part of RPL/2. @@ -239,8 +239,6 @@ instruction_version(struct_processus *s_ unsigned char texte[] = "RPL/2 version "; unsigned char tampon[256 + 1]; - void *pointeur; - (*s_etat_processus).erreur_execution = d_ex; if ((*s_etat_processus).affichage_arguments == 'Y') @@ -911,7 +909,7 @@ instruction_version(struct_processus *s_ return; } - sprintf(tampon, "%d BITS ABI", sizeof(pointeur) * 8); + sprintf(tampon, "%zu BITS ABI", sizeof(void *) * 8); if (((*(*l_element_courant).donnee).objet = malloc((strlen(tampon) + 1 ) * sizeof(unsigned char))) == NULL)