mirror of
https://github.com/justinethier/cyclone.git
synced 2025-05-23 20:15:05 +02:00
Add padding to integer_type
This will prevent assigning to forward() from possibly corrupting memory on 64-bit systems, because the 4-byte int type there does not have enough space to hold an 8-byte pointer.
This commit is contained in:
parent
cef2abfb7e
commit
be0384cd98
1 changed files with 1 additions and 1 deletions
|
@ -235,7 +235,7 @@ typedef symbol_type *symbol;
|
|||
static object quote_##name = nil;
|
||||
|
||||
/* Define numeric types */
|
||||
typedef struct {gc_header_type hdr; tag_type tag; int value;} integer_type;
|
||||
typedef struct {gc_header_type hdr; tag_type tag; int value; int padding;} integer_type;
|
||||
#define make_int(n,v) integer_type n; n.hdr.mark = gc_color_red; n.hdr.grayed = 0; n.tag = integer_tag; n.value = v;
|
||||
typedef struct {gc_header_type hdr; tag_type tag; double value;} double_type;
|
||||
#define make_double(n,v) double_type n; n.hdr.mark = gc_color_red; n.hdr.grayed = 0; n.tag = double_tag; n.value = v;
|
||||
|
|
Loading…
Add table
Reference in a new issue