version 1.2, 2010/01/27 22:22:13
|
version 1.21, 2011/04/21 16:00:57
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.0.10 |
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 |
*/ |
*/ |