Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-07-07 13:16:34 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Revert previous changed due to issues with SRFI 143

Browse source 
Unit tests fail with the previous change in place...
This commit is contained in:
Justin Ethier 2018-10-04 11:11:16 -04:00
parent 657c6c0dad
commit 15b5789e8d
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
include/cyclone/types.h
View file

@ -537,7 +537,7 @@ typedef uint32_t char_type;
* 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 *)((((uintptr_t)c)<<1) | 1)) #define obj_int2obj(c) ((void *)((((long)c)<<1) | 1))
/** /**
* Determine if the object is a char. * Determine if the object is a char.