diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2017-05-12 06:09:45 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2017-05-12 06:09:45 -0700 |
commit | 430490c9413ef7fbd498a5b9649d28f132701009 (patch) | |
tree | 82a22981493d5ec6a04673158236e98c1aa846e4 | |
parent | da96c18699f0780e675d8986ec27e4523194c359 (diff) | |
download | txr-430490c9413ef7fbd498a5b9649d28f132701009.tar.gz txr-430490c9413ef7fbd498a5b9649d28f132701009.tar.bz2 txr-430490c9413ef7fbd498a5b9649d28f132701009.zip |
ffi: bugfix: broken i64 conversion.
* itypes.c (c_i64): Fix c_num being called on the function
pointer num rather than the correct operand n.
-rw-r--r-- | itypes.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -101,7 +101,7 @@ u32_t c_u32(val n, val self) #if SIZEOF_PTR == 8 i64_t c_i64(val n, val self) { - cnum v = c_num(num); + cnum v = c_num(n); if (v < (cnum) -0x8000000000000000 || v > (cnum) 0x7FFFFFFFFFFFFFFF) uw_throwf(error_s, lit("~a: value ~s is out of signed 64 bit range"), self, n, nao); |