compute-struct-offsets ( slots -- size ) (original) (raw)

compute-struct-offsets ( slots -- size )

Vocabulary
classes.struct.private

Inputs

slots a sequence

Outputs

size an integer

Word description
Computes how many bytes of memory the struct takes, minus final padding.

Definition

USING: math sequences ;

IN: classes.struct.private

: compute-struct-offsets ( slots -- size )
0 [ compute-slot-offset ] reduce 8 align 8 /i ;