version 1.29, 2011/08/09 11:31:34
|
version 1.32, 2011/11/26 10:01:30
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.3 |
RPL/2 (R) version 4.1.5 |
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 254 instruction_prst(struct_processus *s_eta
|
Line 254 instruction_prst(struct_processus *s_eta
|
} |
} |
} |
} |
|
|
|
routine_recursive = 2; |
impression_pile(s_etat_processus, (*s_etat_processus).l_base_pile, |
impression_pile(s_etat_processus, (*s_etat_processus).l_base_pile, |
'E', 1); |
'E', 1); |
|
routine_recursive = 0; |
return; |
return; |
} |
} |
|
|
Line 333 instruction_prstc(struct_processus *s_et
|
Line 335 instruction_prstc(struct_processus *s_et
|
} |
} |
} |
} |
|
|
|
routine_recursive = 2; |
impression_pile(s_etat_processus, (*s_etat_processus).l_base_pile, |
impression_pile(s_etat_processus, (*s_etat_processus).l_base_pile, |
'C', 1); |
'C', 1); |
|
routine_recursive = 0; |
return; |
return; |
} |
} |
|
|