             8 >>size
             t >>signed
             8-byte-alignment
-            "from_signed_cell" >>boxer
-            "to_fixnum" >>unboxer
+            "from_signed_8" >>boxer
+            "to_signed_8" >>unboxer
             [ >integer ] >>unboxer-quot
         \ longlong typedef
 

            [ set-alien-unsigned-8 ] >>setter
            8 >>size
            8-byte-alignment
            "from_unsigned_cell" >>boxer
            "to_cell" >>unboxer
            [ >integer ] >>unboxer-quot
        \ ulonglong typedef


            8 >>align
            8 >>align-first
            "from_signed_cell" >>boxer
            "to_fixnum" >>unboxer
            [ >integer ] >>unboxer-quot
        \ longlong typedef

