Diff for /rpl/src/profilage.c between versions 1.41 and 1.71

version 1.41, 2013/03/21 11:30:31 version 1.71, 2024/01/17 16:57:18
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.1.13    RPL/2 (R) version 4.1.36
   Copyright (C) 1989-2013 Dr. BERTRAND Joël    Copyright (C) 1989-2024 Dr. BERTRAND Joël
   
   This file is part of RPL/2.    This file is part of RPL/2.
   
Line 312  ecriture_profil(struct_processus *s_etat Line 312  ecriture_profil(struct_processus *s_etat
     }      }
   
     snprintf(nom, strlen(ds_rplprofile) + 64 + 1,      snprintf(nom, strlen(ds_rplprofile) + 64 + 1,
             "%s-%lu-%lu", ds_rplprofile, (unsigned long) getpid(),              "%s-%llu-%llu", ds_rplprofile, (unsigned long long) getpid(),
             (unsigned long) pthread_self());              (unsigned long long) pthread_self());
   
     if ((fichier = fopen(nom, "w+")) == NULL)      if ((fichier = fopen(nom, "w+")) == NULL)
     {      {
Line 333  ecriture_profil(struct_processus *s_etat Line 333  ecriture_profil(struct_processus *s_etat
         return;          return;
     }      }
   
     if (fprintf(fichier, "Process      : %lu\n", (unsigned long)      if (fprintf(fichier, "Process      : %llu\n", (unsigned long long)
                 getpid()) < 0)                  getpid()) < 0)
     {      {
         (*s_etat_processus).erreur_systeme = d_es_erreur_fichier;          (*s_etat_processus).erreur_systeme = d_es_erreur_fichier;
         return;          return;
     }      }
   
     if (fprintf(fichier, "Thread       : %lu\n", (unsigned long)      if (fprintf(fichier, "Thread       : %llu\n", (unsigned long long)
                 pthread_self()) < 0)                  pthread_self()) < 0)
     {      {
         (*s_etat_processus).erreur_systeme = d_es_erreur_fichier;          (*s_etat_processus).erreur_systeme = d_es_erreur_fichier;

Removed from v.1.41  
changed lines
  Added in v.1.71


CVSweb interface <joel.bertrand@systella.fr>