version 1.319, 2018/05/30 16:50:13
|
version 1.326, 2019/02/03 14:41:28
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.29 |
RPL/2 (R) version 4.1.31 |
Copyright (C) 1989-2018 Dr. BERTRAND Joël |
Copyright (C) 1989-2019 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
|
|
Line 775 pid_t debug_fork();
|
Line 775 pid_t debug_fork();
|
#define d_SPH "Semaphore $n 'name'" |
#define d_SPH "Semaphore $n 'name'" |
#define d_TAB "<[ table ]>" |
#define d_TAB "<[ table ]>" |
#define d_MTX "Mutex $n" |
#define d_MTX "Mutex $n" |
#define d_REC "Record /'name_1', ..., 'name_n'/" |
#define d_REC "|[ record ]|" |
|
|
/* |
/* |
-------------------------------------------------------------------------------- |
-------------------------------------------------------------------------------- |
Line 1137 enum t_type { ADR = 0, ALG, BIN, CHN, C
|
Line 1137 enum t_type { ADR = 0, ALG, BIN, CHN, C
|
PRC : processus (struct_processus_fils *) |
PRC : processus (struct_processus_fils *) |
Sans objet. |
Sans objet. |
|
|
|
REC : enregistrement (struct_record *) |
|
|
REL : reel sur 64 bits (real*8, real8 *) |
REL : reel sur 64 bits (real*8, real8 *) |
Sans objet. |
Sans objet. |
|
|
Line 1582 typedef struct liste_pile_systeme
|
Line 1584 typedef struct liste_pile_systeme
|
logical1 creation_variables_statiques; |
logical1 creation_variables_statiques; |
logical1 creation_variables_partagees; |
logical1 creation_variables_partagees; |
logical1 evaluation_expression; |
logical1 evaluation_expression; |
|
logical1 debug_programme; |
|
|
unsigned char clause; |
unsigned char clause; |
|
|
Line 1762 typedef struct tableau
|
Line 1765 typedef struct tableau
|
|
|
/* |
/* |
-------------------------------------------------------------------------------- |
-------------------------------------------------------------------------------- |
|
Structure enregistrement |
|
-------------------------------------------------------------------------------- |
|
*/ |
|
|
|
typedef struct record |
|
{ |
|
struct_objet *noms; |
|
struct_objet *donnees; |
|
} struct_record; |
|
|
|
|
|
/* |
|
-------------------------------------------------------------------------------- |
Structure arbre |
Structure arbre |
-------------------------------------------------------------------------------- |
-------------------------------------------------------------------------------- |
*/ |
*/ |
Line 1828 typedef struct rpl_arguments
|
Line 1844 typedef struct rpl_arguments
|
unsigned char test_instruction; |
unsigned char test_instruction; |
|
|
integer8 nombre_arguments; |
integer8 nombre_arguments; |
// Nombre d'arguments de la fonction, positif ou nul. |
// Nombre d'arguments de la fonction |
|
// 0 : instruction infixe |
|
// positif : nombre d'arguments (notation algébrique possible) |
|
// -1 : notation algrébrique non autorisée |
|
|
void *s_etat_processus; |
void *s_etat_processus; |
} struct_rpl_arguments; |
} struct_rpl_arguments; |
Line 2478 typedef struct processus
|
Line 2497 typedef struct processus
|
CACHE(integer8, int) |
CACHE(integer8, int) |
CACHE(struct_matrice, mat) |
CACHE(struct_matrice, mat) |
CACHE(struct_nom, nom) |
CACHE(struct_nom, nom) |
|
CACHE(struct_record, rec) |
CACHE(real8, rel) |
CACHE(real8, rel) |
CACHE(struct_tableau, tab) |
CACHE(struct_tableau, tab) |
CACHE(struct_vecteur, vec) |
CACHE(struct_vecteur, vec) |
Line 2893 void instruction_rdz(struct_processus *s
|
Line 2913 void instruction_rdz(struct_processus *s
|
void instruction_re(struct_processus *s_etat_processus); |
void instruction_re(struct_processus *s_etat_processus); |
void instruction_read(struct_processus *s_etat_processus); |
void instruction_read(struct_processus *s_etat_processus); |
void instruction_recode(struct_processus *s_etat_processus); |
void instruction_recode(struct_processus *s_etat_processus); |
|
void instruction_record(struct_processus *s_etat_processus); |
void instruction_recv(struct_processus *s_etat_processus); |
void instruction_recv(struct_processus *s_etat_processus); |
void instruction_redraw(struct_processus *s_etat_processus); |
void instruction_redraw(struct_processus *s_etat_processus); |
void instruction_regex(struct_processus *s_etat_processus); |
void instruction_regex(struct_processus *s_etat_processus); |