This commit is contained in:
Justin Ethier 2018-10-01 16:48:02 -04:00
parent db1cfb57b8
commit 9e0a5c77d3

View file

@ -531,13 +531,13 @@ typedef uint32_t char_type;
* Convert from an object to an integer. * Convert from an object to an integer.
*/ */
//#define obj_obj2int(n) (((long)((ulong)(n) & ~1))/(long)(1uL<<1)) //#define obj_obj2int(n) (((long)((ulong)(n) & ~1))/(long)(1uL<<1))
#define obj_obj2int(x) ((long)(x)>>1) #define obj_obj2int(x) ((long)((uintptr_t)x)>>1)
/** /**
* Convert from an integer to an object. * Convert from an integer to an object.
*/ */
//#define obj_int2obj(n) ((void *) ((((long)(n))*(long)(1uL<<1)) | 1)) //#define obj_int2obj(n) ((void *) ((((long)(n))*(long)(1uL<<1)) | 1))
#define obj_int2obj(c) ((void *)((((long)c)<<1) | 1)) #define obj_int2obj(c) ((void *)((((uintptr_t)c)<<1) | 1))
/** /**
* Determine if the object is a char. * Determine if the object is a char.