mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-01 12:20:26 +02:00
Code Activity

* objects.h (SCM_METACLASS_OPERATOR_LAYOUT, SCM_ENTITY_LAYOUT):

Browse source 
Made procedure slots read-only.
This commit is contained in:
Mikael Djurfeldt 1998-05-04 11:32:44 +00:00
parent 47b210500b
commit b6d850ad9c
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/objects.h
View file

@ -140,7 +140,7 @@ struct scm_metaclass_standard {
SCM direct_slots;
};
#define SCM_METACLASS_OPERATOR_LAYOUT "pwpwpwpwpwpw"
#define SCM_METACLASS_OPERATOR_LAYOUT "pwpwpopopopo"
struct scm_metaclass_operator {
SCM layout;
SCM vcell;
@ -162,7 +162,7 @@ struct scm_metaclass_operator {
*
* An example of an entity class is the class of generic methods.
*/
#define SCM_ENTITY_LAYOUT "pwpwpwpw"
#define SCM_ENTITY_LAYOUT "popopopo"
typedef struct scm_entity {
SCM proc0;
SCM proc1;