alien.endian: Add a couple more types. This vocab needs better

compatibility with c-types.

diff --git a/basis/alien/endian/endian.factor b/basis/alien/endian/endian.factor
index 2c32f2fdcd5bc592a7c0f48c8856cab41cab632c..518447efc77e1c7981841f046b5bffa25d2a5a38 100644 (file)
--- a/basis/alien/endian/endian.factor
+++ b/basis/alien/endian/endian.factor
@@ -119,6 +119,7 @@ ERROR: unsupported-endian-type endian slot ;
         first2 [ slot>endian-slot ] dip 2array
     ] [
         {
+            { [ dup bool = ] [ 2drop bool ] }
             { [ dup char = ] [ 2drop char ] }
             { [ dup uchar = ] [ 2drop uchar ] }
             { [ dup c:short = ] [ { le16 be16 } endian-slot ] }
@@ -128,6 +129,7 @@ ERROR: unsupported-endian-type endian slot ;
             { [ dup longlong = ] [ { le64 be64 } endian-slot ] }
             { [ dup ulonglong = ] [ { ule64 ube64 } endian-slot ] }
             { [ dup endian-c-type? ] [ nip ] }
+            { [ dup pointer? ] [ nip ] }
             [ unsupported-endian-type ]
         } cond
     ] if ;