rpl/src/instructions_k1.c - diff

Return to instructions_k1.c CVS log

Up to [local] / rpl / src

-version 1.9, 2010/06/24 10:10:43
+version 1.10, 2010/07/13 13:17:21
  Line 284  instruction_kind(struct_processus *s_eta
          printf("    1: %s, %s, %s, %s, %s, %s,\n"
                  "       %s, %s, %s\n",
                  d_INT, d_REL, d_CPL, d_VIN, d_VRL, d_VCX, d_MIN, d_MRL, d_MCX);
-         printf("->  1: %s\n", d_INT);
+         printf("->  1: %s\n\n", d_INT);
+         if ((*s_etat_processus).langue == 'F')
+         {
+             printf("  Valeurs renvoyées : \n\n");
+             printf("    0  : objet entier\n");
+             printf("    1  : objet réel\n");
+             printf("    2  : objet complexe\n");
+         }
+         else
+         {
+             printf("  Returned values : \n\n");
+             printf("    0  : integer object\n");
+             printf("    1  : real object\n");
+             printf("    2  : complex object\n");
+         }
          return;
      }