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