define-endian-packed-struct-class ( class slots endian -- )


Vocabulary
alien.endian

Definition
USING: classes.struct.private kernel ;

IN: alien.endian

: define-endian-packed-struct-class
( class slots endian -- )
swap make-packed-slots set-endian-slots
[ compute-struct-offsets ] [ drop 1 ] (define-struct-class)
;