Diff for /rpl/src/instructions_h1.c between versions 1.45 and 1.46

version 1.45, 2013/03/16 11:31:41 version 1.46, 2013/03/20 17:11:45
Line 325  instruction_hms_plus(struct_processus *s Line 325  instruction_hms_plus(struct_processus *s
             return;              return;
         }          }
   
         (*((real8 *) (*s_objet_resultat).objet)) = (*((integer8 *)          (*((real8 *) (*s_objet_resultat).objet)) = ((real8) (*((integer8 *)
                 (*s_objet_argument_2).objet)) + (*((real8 *)                  (*s_objet_argument_2).objet))) + (*((real8 *)
                 (*s_objet_argument_1).objet));                  (*s_objet_argument_1).objet));
   
         conversion_decimal_vers_hms((real8 *) (*s_objet_resultat).objet);          conversion_decimal_vers_hms((real8 *) (*s_objet_resultat).objet);
Line 344  instruction_hms_plus(struct_processus *s Line 344  instruction_hms_plus(struct_processus *s
         }          }
   
         (*((real8 *) (*s_objet_resultat).objet)) = (*((real8 *)          (*((real8 *) (*s_objet_resultat).objet)) = (*((real8 *)
                 (*s_objet_argument_2).objet)) + (*((integer8 *)                  (*s_objet_argument_2).objet)) + ((real8) (*((integer8 *)
                 (*s_objet_argument_1).objet));                  (*s_objet_argument_1).objet)));
   
         conversion_decimal_vers_hms((real8 *) (*s_objet_resultat).objet);          conversion_decimal_vers_hms((real8 *) (*s_objet_resultat).objet);
     }      }
Line 526  instruction_hms_moins(struct_processus * Line 526  instruction_hms_moins(struct_processus *
             return;              return;
         }          }
   
         (*((real8 *) (*s_objet_resultat).objet)) = (*((integer8 *)          (*((real8 *) (*s_objet_resultat).objet)) = ((real8) (*((integer8 *)
                 (*s_objet_argument_2).objet)) - (*((real8 *)                  (*s_objet_argument_2).objet))) - (*((real8 *)
                 (*s_objet_argument_1).objet));                  (*s_objet_argument_1).objet));
   
         conversion_decimal_vers_hms((real8 *) (*s_objet_resultat).objet);          conversion_decimal_vers_hms((real8 *) (*s_objet_resultat).objet);
Line 545  instruction_hms_moins(struct_processus * Line 545  instruction_hms_moins(struct_processus *
         }          }
   
         (*((real8 *) (*s_objet_resultat).objet)) = (*((real8 *)          (*((real8 *) (*s_objet_resultat).objet)) = (*((real8 *)
                 (*s_objet_argument_2).objet)) - (*((integer8 *)                  (*s_objet_argument_2).objet)) - ((real8) (*((integer8 *)
                 (*s_objet_argument_1).objet));                  (*s_objet_argument_1).objet)));
   
         conversion_decimal_vers_hms((real8 *) (*s_objet_resultat).objet);          conversion_decimal_vers_hms((real8 *) (*s_objet_resultat).objet);
     }      }

Removed from v.1.45  
changed lines
  Added in v.1.46


CVSweb interface <joel.bertrand@systella.fr>