Mercurial > repos > rhope

comparison runtime/object.h @ 42:aabda74c7a88

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fields can now be defined to have naked primitive types
author Mike Pavone <pavone@retrodev.com>
date Tue, 13 Oct 2009 00:07:34 -0400
parents 1b86a1ee500a
children 3e20ed8959c4
comparison
equal deleted inserted replaced
41:1b86a1ee500a 42:aabda74c7a88
50 uint16_t num_params; 50 uint16_t num_params;
51 uint16_t resume; 51 uint16_t resume;
52 object *params[1]; 52 object *params[1];
53 } calldata; 53 } calldata;
54 54
55 #define OBegin typedef struct { object header; 55 #define OBegin typedef struct {
56 #define Object(name) } t_ ## name; 56 #define Object(name) } nt_ ## name; typedef struct { object _SP_header; nt_ ## name payload; } t_ ## name;
57 #define Box(nakedtype,fieldname,objectname) typedef struct{ object _SP_header; nakedtype fieldname; } t_ ## objectname;
57 58
58 #define MOBegin typedef struct { multisize header; 59 #define MOBegin typedef struct { multisize header;
59 60
60 #define get_blueprint(object) (object)->bprint 61 #define get_blueprint(object) (object)->bprint
61 62