version 1.26, 2011/06/27 09:04:59
|
version 1.36, 2012/04/13 14:12:57
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.0 |
RPL/2 (R) version 4.1.8 |
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 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; |
} |
} |
|
|