--- rpl/src/instructions_s10.c	2013/03/21 11:30:30	1.70
+++ rpl/src/instructions_s10.c	2013/03/21 16:31:59	1.72
@@ -1276,7 +1276,8 @@ instruction_smphrtrydecr(struct_processu
 				return;
 			}
 
-			horodatage.tv_sec += (*((integer8 *) (*s_objet_argument_1).objet));
+			horodatage.tv_sec += (time_t) (*((integer8 *)
+					(*s_objet_argument_1).objet));
 		}
 		else
 		{
@@ -1290,7 +1291,7 @@ instruction_smphrtrydecr(struct_processu
 			}
 
 			partie_entiere = floor((*((real8 *) (*s_objet_argument_1).objet)));
-			horodatage.tv_sec += (__time_t) partie_entiere;
+			horodatage.tv_sec += (time_t) partie_entiere;
 			horodatage.tv_usec += ((suseconds_t) ((*((real8 *)
 					(*s_objet_argument_1).objet)) - partie_entiere)) * 1000000;