version 1.27, 2010/09/02 07:51:48
|
version 1.30, 2010/12/12 14:13:39
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.0.19 |
RPL/2 (R) version 4.0.20 |
Copyright (C) 1989-2010 Dr. BERTRAND Joël |
Copyright (C) 1989-2010 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
Line 3400 lecture_pipe(struct_processus *s_etat_pr
|
Line 3400 lecture_pipe(struct_processus *s_etat_pr
|
================================================================================ |
================================================================================ |
*/ |
*/ |
|
|
#ifndef OS2 |
|
extern inline |
|
#endif |
|
void |
void |
scrutation_injection(struct_processus *s_etat_processus) |
scrutation_injection(struct_processus *s_etat_processus) |
{ |
{ |
|
char s=65; |
fd_set ensemble_descripteurs; |
fd_set ensemble_descripteurs; |
|
|
|
logical1 drapeau_erreur; |
|
logical1 registre_arret_si_exception; |
|
|
# if !defined(OpenBSD) && !defined(OS2) |
# if !defined(OpenBSD) && !defined(OS2) |
struct timespec timeout; |
struct timespec timeout; |
# else |
# else |
struct timeval timeout; |
struct timeval timeout; |
# endif |
# endif |
|
|
logical1 drapeau_erreur; |
|
logical1 registre_arret_si_exception; |
|
|
|
unsigned char tampon; |
unsigned char tampon; |
unsigned char tampon_profilage[20]; |
unsigned char tampon_profilage[20]; |
|
|
// Si on est dans le processus père, il n'y a rien à surveiller. |
// Si on est dans le processus père, il n'y a rien à surveiller. |
|
|
|
BUG(s != 65, BACKTRACE(30)); |
if ((*s_etat_processus).var_volatile_processus_racine == 0) |
if ((*s_etat_processus).var_volatile_processus_racine == 0) |
{ |
{ |
FD_ZERO(&ensemble_descripteurs); |
FD_ZERO(&ensemble_descripteurs); |
Line 3616 scrutation_injection(struct_processus *s
|
Line 3615 scrutation_injection(struct_processus *s
|
================================================================================ |
================================================================================ |
*/ |
*/ |
|
|
inline int test_arret(struct_processus *s_etat_processus) |
int |
|
test_arret(struct_processus *s_etat_processus) |
{ |
{ |
return((int) (*s_etat_processus).var_volatile_requete_arret); |
return((int) (*s_etat_processus).var_volatile_requete_arret); |
} |
} |