From 05ef13fff40e10ca72a4f54aa35cc1d5a0492084 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Mon, 7 Jul 2014 17:25:28 -0700 Subject: [PATCH] alien.c-types: Revert previous changes to 64 bit boxing/unboxing. Seems to work. See #1062. --- basis/alien/c-types/c-types.factor | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/basis/alien/c-types/c-types.factor b/basis/alien/c-types/c-types.factor index 1e786cba79..9d4b61500e 100644 --- a/basis/alien/c-types/c-types.factor +++ b/basis/alien/c-types/c-types.factor @@ -421,8 +421,8 @@ M: pointer lookup-c-type 8 >>size t >>signed 8-byte-alignment - "from_signed_8" >>boxer - "to_signed_8" >>unboxer + "from_signed_cell" >>boxer + "to_fixnum" >>unboxer [ >integer ] >>unboxer-quot \ longlong typedef @@ -433,8 +433,8 @@ M: pointer lookup-c-type [ set-alien-unsigned-8 ] >>setter 8 >>size 8-byte-alignment - "from_unsigned_8" >>boxer - "to_unsigned_8" >>unboxer + "from_unsigned_cell" >>boxer + "to_cell" >>unboxer [ >integer ] >>unboxer-quot \ ulonglong typedef