version 1.2, 2010/01/27 22:22:15
|
version 1.10, 2010/06/19 18:01:17
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.0.10 |
RPL/2 (R) version 4.0.16 |
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 816 instruction_row_plus(struct_processus *s
|
Line 816 instruction_row_plus(struct_processus *s
|
return; |
return; |
} |
} |
|
|
if (position == (integer8) (*((struct_matrice *) |
if (position != ((integer8) (*((struct_matrice *) |
(*s_objet_argument_3).objet)).nombre_lignes) |
(*s_objet_argument_3).objet)).nombre_lignes + 1)) |
{ |
{ |
for(j = i = 0; i < (*((struct_matrice *) |
for(j = i = 0; i < (*((struct_matrice *) |
(*s_objet_argument_3).objet)).nombre_lignes; i++) |
(*s_objet_argument_3).objet)).nombre_lignes; i++) |