version 1.5, 2010/03/04 10:09:31
|
version 1.9, 2010/04/07 13:45:05
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.0.11 |
RPL/2 (R) version 4.0.14 |
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 1760 instruction_detach(struct_processus *s_e
|
Line 1760 instruction_detach(struct_processus *s_e
|
l_element_suivant = (*l_element_courant).suivant; |
l_element_suivant = (*l_element_courant).suivant; |
|
|
fclose((*((struct_descripteur_fichier *) |
fclose((*((struct_descripteur_fichier *) |
(*l_element_courant).donnee)).descripteur); |
(*l_element_courant).donnee)).descripteur_c); |
|
|
|
if ((*((struct_descripteur_fichier *) |
|
(*l_element_courant).donnee)).type != 'C') |
|
{ |
|
sqlite3_close((*((struct_descripteur_fichier *) |
|
(*l_element_courant).donnee)).descripteur_sqlite); |
|
} |
|
|
free((*((struct_descripteur_fichier *) (*l_element_courant) |
free((*((struct_descripteur_fichier *) (*l_element_courant) |
.donnee)).nom); |
.donnee)).nom); |
Line 1979 instruction_detach(struct_processus *s_e
|
Line 1986 instruction_detach(struct_processus *s_e
|
l_element_suivant = (*l_element_courant).suivant; |
l_element_suivant = (*l_element_courant).suivant; |
|
|
fclose((*((struct_descripteur_fichier *) |
fclose((*((struct_descripteur_fichier *) |
(*l_element_courant).donnee)).descripteur); |
(*l_element_courant).donnee)).descripteur_c); |
|
|
|
if ((*((struct_descripteur_fichier *) |
|
(*l_element_courant).donnee)).type != 'C') |
|
{ |
|
sqlite3_close((*((struct_descripteur_fichier *) |
|
(*l_element_courant).donnee)).descripteur_sqlite); |
|
} |
|
|
if (((*((struct_descripteur_fichier *) (*l_element_courant) |
if (((*((struct_descripteur_fichier *) (*l_element_courant) |
.donnee)).pid == getpid()) && |
.donnee)).pid == getpid()) && |