--- rpl/src/semaphores.c 2013/02/26 19:56:18 1.54 +++ rpl/src/semaphores.c 2014/07/17 08:07:27 1.65 @@ -1,7 +1,7 @@ /* ================================================================================ - RPL/2 (R) version 4.1.12 - Copyright (C) 1989-2013 Dr. BERTRAND Joël + RPL/2 (R) version 4.1.19 + Copyright (C) 1989-2014 Dr. BERTRAND Joël This file is part of RPL/2. @@ -23,8 +23,6 @@ #include "rpl-conv.h" -#ifdef SEMAPHORES_NOMMES - // Les fonctions suivantes ne sont utilisées que dans le cas d'un // système POSIX qui ne possède pas de sémaphores anonymes. MacOS X // est dans ce cas. @@ -39,7 +37,7 @@ nom_segment_semaphore(pid_t pid, int ord return(NULL); } - sprintf(fichier, "/RPL-%d-%d", (int) pid, ordre); + sprintf(fichier, "/RPL-%llu-%d", (unsigned long long) pid, ordre); return(fichier); } @@ -54,7 +52,7 @@ nom_segment_semaphore_thread(pid_t pid, return(NULL); } - sprintf(fichier, "/RPL-%d-%llX-%d", (int) pid, + sprintf(fichier, "/RPL-%llu-%llu-%d", (unsigned long long) pid, (unsigned long long) tid, ordre); return(fichier); } @@ -173,10 +171,6 @@ sem_destroy3(sem_t *semaphore, pid_t pid } -#undef sem_post -#undef sem_wait -#undef sem_trywait - int sem_getvalue2(sem_t *semaphore, int *valeur) { @@ -242,7 +236,11 @@ sem_getvalue2(sem_t *semaphore, int *val return(0); } -#endif + +#undef sem_post +#undef sem_wait +#undef sem_trywait + #ifdef IPCS_SYSV @@ -332,7 +330,7 @@ sem_init_SysV(sem_t *semaphore, int shar return(-1); } - argument.val = valeur; + argument.val = (int) valeur; ios = semctl((*semaphore).sem, 0, SETVAL, argument); return(ios); @@ -925,7 +923,7 @@ sem_t return(SEM_FAILED); } - argument.val = valeur; + argument.val = (int) valeur; semctl((*semaphore).sem, 0, SETVAL, argument); # else // OS/2 if ((psem = malloc(sizeof(sem_t))) == NULL)