version 1.6, 2010/03/17 14:14:37
|
version 1.13, 2010/08/06 15:26:51
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.0.13 |
RPL/2 (R) version 4.0.18 |
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 20
|
Line 20
|
*/ |
*/ |
|
|
|
|
#include "rpl.conv.h" |
#include "rpl-conv.h" |
|
|
|
|
/* |
/* |
Line 154 rplcore(struct_processus *s_etat_process
|
Line 154 rplcore(struct_processus *s_etat_process
|
|
|
free(message_erreur); |
free(message_erreur); |
|
|
|
if (fprintf(fichier, "// System stack\n\n") < 0) |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_erreur_fichier; |
|
return; |
|
} |
|
|
|
trace(s_etat_processus, fichier); |
|
|
if (fprintf(fichier, "// Process stack\n\n") < 0) |
if (fprintf(fichier, "// Process stack\n\n") < 0) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_erreur_fichier; |
(*s_etat_processus).erreur_systeme = d_es_erreur_fichier; |