version 1.51, 2011/11/26 10:01:31
|
version 1.56, 2012/04/12 09:56:40
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.5 |
RPL/2 (R) version 4.1.7 |
Copyright (C) 1989-2011 Dr. BERTRAND Joël |
Copyright (C) 1989-2012 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
|
|
Line 45 instruction_spawn(struct_processus *s_et
|
Line 45 instruction_spawn(struct_processus *s_et
|
|
|
pthread_mutexattr_t attributs_mutex; |
pthread_mutexattr_t attributs_mutex; |
|
|
pthread_t thread_id; |
|
pthread_t thread_surveillance; |
pthread_t thread_surveillance; |
|
|
struct_descripteur_thread *s_argument_thread; |
struct_descripteur_thread *s_argument_thread; |
Line 415 instruction_spawn(struct_processus *s_et
|
Line 414 instruction_spawn(struct_processus *s_et
|
|
|
(*s_argument_thread).thread_actif = d_faux; |
(*s_argument_thread).thread_actif = d_faux; |
|
|
if (pthread_create(&thread_id, &attributs, lancement_thread, |
if (pthread_create(&(*s_nouvel_etat_processus).tid, |
s_argument_thread) != 0) |
&attributs, lancement_thread, s_argument_thread) != 0) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_processus; |
(*s_etat_processus).erreur_systeme = d_es_processus; |
return; |
return; |
Line 707 instruction_sqlconnect(struct_processus
|
Line 706 instruction_sqlconnect(struct_processus
|
if ((s_objet_resultat = parametres_sql(s_etat_processus, |
if ((s_objet_resultat = parametres_sql(s_etat_processus, |
s_objet_argument)) == NULL) |
s_objet_argument)) == NULL) |
{ |
{ |
|
liberation(s_etat_processus, s_objet_resultat); |
liberation(s_etat_processus, s_objet_argument); |
liberation(s_etat_processus, s_objet_argument); |
return; |
return; |
} |
} |
|
|
|
if ((*s_etat_processus).erreur_execution == |
|
d_ex_instruction_indisponible) |
|
{ |
|
liberation(s_etat_processus, s_objet_resultat); |
|
return; |
|
} |
|
|
if ((s_objet_systeme = copie_objet(s_etat_processus, s_objet_resultat, |
if ((s_objet_systeme = copie_objet(s_etat_processus, s_objet_resultat, |
'O')) == NULL) |
'O')) == NULL) |
{ |
{ |