Added comments

This commit is contained in:
Justin Ethier 2016-04-20 21:57:40 -04:00
parent dfe9b477c2
commit f5c258e76d

View file

@ -230,7 +230,7 @@ typedef void (*function_type_va) (int, object, object, object, ...);
typedef struct { typedef struct {
gc_header_type hdr; gc_header_type hdr;
tag_type tag; tag_type tag;
object *pvar; object *pvar; /* GC assumes this is a Cyclone object! */
} cvar_type; } cvar_type;
typedef cvar_type *cvar; typedef cvar_type *cvar;
#define make_cvar(n,v) \ #define make_cvar(n,v) \
@ -246,7 +246,7 @@ typedef cvar_type *cvar;
typedef struct { typedef struct {
gc_header_type hdr; gc_header_type hdr;
tag_type tag; tag_type tag;
void *ptr; void *ptr; /* Can be anything, GC will not collect it */
} c_opaque_type; } c_opaque_type;
typedef c_opaque_type *c_opaque; typedef c_opaque_type *c_opaque;
#define make_c_opaque(var, p) \ #define make_c_opaque(var, p) \