--- rpl/src/instructions_s10.c	2013/03/21 14:39:10	1.71
+++ rpl/src/instructions_s10.c	2013/04/01 15:29:37	1.73
@@ -1,6 +1,6 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.13
+  RPL/2 (R) version 4.1.14
   Copyright (C) 1989-2013 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
@@ -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
 		{