version 1.1, 2010/05/09 15:43:15
|
version 1.36, 2013/04/01 15:29:37
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.0.15 |
RPL/2 (R) version 4.1.14 |
Copyright (C) 1989-2010 Dr. BERTRAND Joël |
Copyright (C) 1989-2013 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
|
|
Line 20
|
Line 20
|
*/ |
*/ |
|
|
|
|
#include "rpl.conv.h" |
#include "rpl-conv.h" |
|
|
|
|
/* |
/* |
Line 71 instruction_memlock(struct_processus *s_
|
Line 71 instruction_memlock(struct_processus *s_
|
} |
} |
} |
} |
|
|
if (_POSIX_MEMLOCK > 0) |
# if _POSIX_MEMLOCK > 0 |
{ |
|
if (mlockall(MCL_CURRENT | MCL_FUTURE) != 0) |
if (mlockall(MCL_CURRENT | MCL_FUTURE) != 0) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
return; |
return; |
} |
} |
} |
# else |
else |
|
{ |
|
if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
{ |
{ |
printf("+++Attention : Verrouillage en mémoire du processus " |
printf("+++Attention : Verrouillage en mémoire du processus " |
Line 92 instruction_memlock(struct_processus *s_
|
Line 89 instruction_memlock(struct_processus *s_
|
} |
} |
|
|
fflush(stdout); |
fflush(stdout); |
} |
# endif |
|
|
return; |
return; |
} |
} |
Line 117 instruction_memunlock(struct_processus *
|
Line 114 instruction_memunlock(struct_processus *
|
|
|
if ((*s_etat_processus).affichage_arguments == 'Y') |
if ((*s_etat_processus).affichage_arguments == 'Y') |
{ |
{ |
printf("\n MEMLOCK "); |
printf("\n MEMUNLOCK "); |
|
|
if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
{ |
{ |
Line 146 instruction_memunlock(struct_processus *
|
Line 143 instruction_memunlock(struct_processus *
|
} |
} |
} |
} |
|
|
if (_POSIX_MEMLOCK > 0) |
# if _POSIX_MEMLOCK > 0 |
{ |
|
if (munlockall() != 0) |
if (munlockall() != 0) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
return; |
return; |
} |
} |
} |
# else |
else |
|
{ |
|
if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
{ |
{ |
printf("+++Attention : Verrouillage en mémoire du processus " |
printf("+++Attention : Verrouillage en mémoire du processus " |
Line 167 instruction_memunlock(struct_processus *
|
Line 161 instruction_memunlock(struct_processus *
|
} |
} |
|
|
fflush(stdout); |
fflush(stdout); |
} |
# endif |
|
|
return; |
return; |
} |
} |