Diff for /rpl/src/instructions_h1.c between versions 1.1 and 1.21

version 1.1, 2010/01/26 15:22:45 version 1.21, 2011/04/21 16:00:57
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.0.9    RPL/2 (R) version 4.1.0.prerelease.0
   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 715  instruction_help(struct_processus *s_eta Line 715  instruction_help(struct_processus *s_eta
     unsigned char           *registre;      unsigned char           *registre;
   
 #   undef COMPLETION  #   undef COMPLETION
 #   include "completion.conv.h"  #   include "completion-conv.h"
 #   include "usages.conv.h"  #   include "usages-conv.h"
   
     if ((*s_etat_processus).test_instruction == 'Y')      if ((*s_etat_processus).test_instruction == 'Y')
     {      {
Line 897  instruction_help(struct_processus *s_eta Line 897  instruction_help(struct_processus *s_eta
         printf("  32      : impression automatique (désarmé)\n");          printf("  32      : impression automatique (désarmé)\n");
         printf("  33      : retour à la ligne automatique invalidé "          printf("  33      : retour à la ligne automatique invalidé "
                 "(désarmé)\n");                  "(désarmé)\n");
         printf("  34      : réservé (désarmé)\n");          printf("  34      : évaluation des caractères de contrôle (armé)\n");
         printf("  35      : évaluation symbolique des constantes (armé)\n");          printf("  35      : évaluation symbolique des constantes (armé)\n");
         printf("  36      : évaluation symbolique des fonctions (armé)\n");          printf("  36      : évaluation symbolique des fonctions (armé)\n");
         printf("  37 à 42 : taille des entiers binaires, bit de poids faible "          printf("  37 à 42 : taille des entiers binaires, bit de poids faible "
Line 925  instruction_help(struct_processus *s_eta Line 925  instruction_help(struct_processus *s_eta
         printf("  CTRL+Z : HALT.\n\n");          printf("  CTRL+Z : HALT.\n\n");
   
         printf("Flags (default values) :\n");          printf("Flags (default values) :\n");
         printf("  1 à 30  : user flags (cleared)\n");          printf("  1 to 30  : user flags (cleared)\n");
         printf("  31      : LAST stack enabled (set in interactive mode, "          printf("  31       : LAST stack enabled (set in interactive mode, "
                 "cleared if not)\n");                  "cleared if not)\n");
         printf("  32      : automatic printing (cleared)\n");          printf("  32       : automatic printing (cleared)\n");
         printf("  33      : automatic carriage return disabled "          printf("  33       : automatic carriage return disabled "
                 "(cleared)\n");                  "(cleared)\n");
         printf("  34      : reserved (cleared)\n");          printf("  34       : control characters evaluation (set)\n");
         printf("  35      : constant symbolic evaluation (set)\n");          printf("  35       : constant symbolic evaluation (set)\n");
         printf("  36      : function symbolic evaluation (set)\n");          printf("  36       : function symbolic evaluation (set)\n");
         printf("  37 à 42 : size of binary integers, while starting with "          printf("  37 to 42 : size of binary integers, while starting with "
                 "less significant bit (set)\n");                  "less significant bit\n");
         printf("  43 à 44 : binary integer basis (cleared)\n");          printf("             (set)\n");
         printf("  45      : multiline conversion (set)\n");          printf("  43 to 44 : binary integer basis (cleared)\n");
         printf("  46 à 47 : reserved (cleared)\n");          printf("  45       : multiline conversion (set)\n");
         printf("  48      : comma as decimal separator (cleared)\n");          printf("  46 to 47 : reserved (cleared)\n");
         printf("  49 à 50 : numbers format (cleared)\n");          printf("  48       : comma as decimal separator (cleared)\n");
         printf("  51      : visual bell disabled (cleared)\n");          printf("  49 to 50 : numbers format (cleared)\n");
         printf("  52      : graphic automatic redrawing disabled "          printf("  51       : visual bell disabled (cleared)\n");
           printf("  52       : graphic automatic redrawing disabled "
                 "(cleared)\n");                  "(cleared)\n");
         printf("  53 à 56 : precision, while starting with "          printf("  53 to 56 : precision, while starting with "
                 "less significant bit (cleared)\n");                  "less significant bit (cleared)\n");
         printf("  57 à 59 : reserved (cleared)\n");          printf("  57 to 59 : reserved (cleared)\n");
         printf("  60      : radian mode instead of degree one (set)\n");          printf("  60       : radian mode instead of degree one (set)\n");
         printf("  61 à 64 : reserved (cleared)\n");          printf("  61 to 64 : reserved (cleared)\n");
     }      }
   
     printf("\n");      printf("\n");
Line 1027  instruction_help(struct_processus *s_eta Line 1028  instruction_help(struct_processus *s_eta
   
     while((fonction = readline("HELP> ")) != NULL)      while((fonction = readline("HELP> ")) != NULL)
     {      {
         funlockfile(stdin);  
         funlockfile(stdout);  
   
         if (strcmp(fonction, "") == 0)          if (strcmp(fonction, "") == 0)
         {          {
             break;              break;
         }          }
   
           funlockfile(stdin);
           funlockfile(stdout);
   
         /*          /*
          * Élimination des blancs précédents l'instruction           * Élimination des blancs précédents l'instruction
          */           */

Removed from v.1.1  
changed lines
  Added in v.1.21


CVSweb interface <joel.bertrand@systella.fr>