Diff for /rpl/src/instructions_t1.c between versions 1.12 and 1.27

version 1.12, 2010/07/13 09:39:14 version 1.27, 2011/06/24 20:31:40
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.0.17    RPL/2 (R) version 4.1.0.prerelease.4
   Copyright (C) 1989-2010 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 20 Line 20
 */  */
   
   
 #include "rpl.conv.h"  #include "rpl-conv.h"
   
   
 /*  /*
Line 64  instruction_type(struct_processus *s_eta Line 64  instruction_type(struct_processus *s_eta
                 d_TAB,                  d_TAB,
                 d_BIN, d_NOM, d_CHN, d_LST, d_ALG, d_RPN, d_FCH, d_SLB, d_SCK,                  d_BIN, d_NOM, d_CHN, d_LST, d_ALG, d_RPN, d_FCH, d_SLB, d_SCK,
                 d_PRC);                  d_PRC);
         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  : scalaire (entier ou réel)\n");
               printf("    1  : complexe\n");
               printf("    2  : chaîne de caractères\n");
               printf("    3  : vecteur ou matrice de scalaires\n");
               printf("    4  : vecteur ou matrice de complexes\n");
               printf("    5  : liste\n");
               printf("    6  : adresse\n");
               printf("    7  : nom\n");
               printf("    8  : expression en notation polonaire inversée\n");
               printf("    9  : expression algébrique\n");
               printf("    10 : entier binaire\n");
               printf("    11 : descripteur de fichier\n");
               printf("    12 : descripteur de bibliothèque partagée\n");
               printf("    13 : descripteur de socket\n");
               printf("    14 : processus\n");
               printf("    15 : fonction\n");
               printf("    16 : table\n");
           }
           else
           {
               printf("  Returned values : \n\n");
               printf("    0  : scalar, integer or real number\n");
               printf("    1  : complex\n");
               printf("    2  : string\n");
               printf("    3  : scalar vector or scalar matrix\n");
               printf("    4  : complex vector or complex matrix\n");
               printf("    5  : list\n");
               printf("    6  : address\n");
               printf("    7  : name\n");
               printf("    8  : RPN expression\n");
               printf("    9  : algebraic expression\n");
               printf("    10 : binary integer\n");
               printf("    11 : file descriptor\n");
               printf("    12 : shared library descriptor\n");
               printf("    13 : socket descriptor\n");
               printf("    14 : process\n");
               printf("    15 : function\n");
               printf("    16 : table\n");
           }
   
         return;          return;
     }      }

Removed from v.1.12  
changed lines
  Added in v.1.27


CVSweb interface <joel.bertrand@systella.fr>