version 1.26, 2011/06/26 08:41:53
|
version 1.32, 2011/09/26 15:57:13
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.0.prerelease.4 |
RPL/2 (R) version 4.1.4 |
Copyright (C) 1989-2011 Dr. BERTRAND Joël |
Copyright (C) 1989-2011 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
Line 1049 instruction_int(struct_processus *s_etat
|
Line 1049 instruction_int(struct_processus *s_etat
|
|
|
printf(" 2: %s, %s, %s, %s\n", d_INT, d_REL, d_NOM, d_ALG); |
printf(" 2: %s, %s, %s, %s\n", d_INT, d_REL, d_NOM, d_ALG); |
printf(" 1: %s\n", d_NOM); |
printf(" 1: %s\n", d_NOM); |
printf("-> 1: %s, %s\n", d_INT, d_ALG); |
printf("-> 1: %s, %s, %s, %s\n", d_INT, d_REL, d_NOM, d_ALG); |
return; |
return; |
} |
} |
else if ((*s_etat_processus).test_instruction == 'Y') |
else if ((*s_etat_processus).test_instruction == 'Y') |
Line 1070 instruction_int(struct_processus *s_etat
|
Line 1070 instruction_int(struct_processus *s_etat
|
|
|
if (test_cfsf(s_etat_processus, 31) == d_vrai) |
if (test_cfsf(s_etat_processus, 31) == d_vrai) |
{ |
{ |
if (empilement_pile_last(s_etat_processus, 3) == d_erreur) |
if (empilement_pile_last(s_etat_processus, 2) == d_erreur) |
{ |
{ |
return; |
return; |
} |
} |