*** empty log message ***

This commit is contained in:
2005-05-25 16:44:05 +00:00
parent 0d2505aee8
commit f7eceec648
6 changed files with 108 additions and 77 deletions

View File

@@ -1,5 +1,5 @@
/*
* $Id: class.h,v 1.3 2005-05-24 03:29:43 bacon Exp $
* $Id: class.h,v 1.4 2005-05-25 16:44:05 bacon Exp $
*/
#ifndef _XP_STX_CLASS_H_
@@ -8,43 +8,39 @@
#include <xp/stx/stx.h>
/* definitions for common objects */
#define XP_STX_CLASS_SIZE 7
#define XP_STX_CLASS_NAME 0
#define XP_STX_CLASS_SPEC 1
#define XP_STX_CLASS_METHODS 2
#define XP_STX_CLASS_SUPERCLASS 3
#define XP_STX_CLASS_VARIABLES 4
#define XP_STX_CLASS_CLASSVARS 5
#define XP_STX_CLASS_POOLDICT 6
#define XP_STX_CLASS_SIZE 7
#define XP_STX_CLASS_SPEC 0
#define XP_STX_CLASS_METHODS 1
#define XP_STX_CLASS_SUPERCLASS 2
#define XP_STX_CLASS_NAME 3
#define XP_STX_CLASS_VARIABLES 4
#define XP_STX_CLASS_CLASS_VARIABLES 5
#define XP_STX_CLASS_POOL_DICTIONARIES 6
#define XP_STX_METACLASS_SIZE 6
#define XP_STX_METACLASS_NAME 0
#define XP_STX_METACLASS_SPEC 1
#define XP_STX_METACLASS_METHODS 2
#define XP_STX_METACLASS_SUPERCLASS 3
#define XP_STX_METACLASS_VARIABLES 4
#define XP_STX_METACLASS_CLASS 5
#define XP_STX_METACLASS_SIZE 4
#define XP_STX_METACLASS_SPEC 0
#define XP_STX_METACLASS_METHODS 1
#define XP_STX_METACLASS_SUPERCLASS 2
#define XP_STX_METACLASS_INSTANCE_CLASS 3
struct xp_stx_class_t
{
xp_stx_objhdr_t header;
xp_stx_word_t name;
xp_stx_word_t spec; /* indexable: 1, nfields: the rest */
xp_stx_word_t methods;
xp_stx_word_t superclass;
xp_stx_word_t name;
xp_stx_word_t variables;
xp_stx_word_t classvars;
xp_stx_word_t pooldict;
xp_stx_word_t class_variables;
xp_stx_word_t pool_dictonaries;
};
struct xp_stx_metaclass_t
{
xp_stx_objhdr_t header;
xp_stx_word_t name;
xp_stx_word_t spec;
xp_stx_word_t methods;
xp_stx_word_t superclass;
xp_stx_word_t variables;
xp_stx_word_t instance_class;
};