--- rpl/src/instructions_d4.c 2013/03/20 17:11:44 1.49 +++ rpl/src/instructions_d4.c 2013/09/06 10:30:53 1.53 @@ -1,6 +1,6 @@ /* ================================================================================ - RPL/2 (R) version 4.1.13 + RPL/2 (R) version 4.1.16 Copyright (C) 1989-2013 Dr. BERTRAND Joël This file is part of RPL/2. @@ -853,10 +853,10 @@ instruction_drws(struct_processus *s_eta if (((*s_etat_processus).colonne_statistique_1 < 1) || ((*s_etat_processus).colonne_statistique_2 < 1) || - ((*s_etat_processus).colonne_statistique_1 > (signed long) + ((*s_etat_processus).colonne_statistique_1 > (*((struct_matrice *) (*s_objet_statistique).objet)) .nombre_colonnes) || - ((*s_etat_processus).colonne_statistique_2 > (signed long) + ((*s_etat_processus).colonne_statistique_2 > (*((struct_matrice *) (*s_objet_statistique).objet)) .nombre_colonnes)) {