struct-alignment ( slots -- align )

Vocabulary

classes.struct.private

Inputs

slots

an object

Outputs

align

an object

Definition

USING: accessors classes.struct kernel math.order sequences ;

IN: classes.struct.private

: struct-alignment ( slots -- align )
    [ struct-bit-slot-spec? ] reject 1
    [ dup offset>> c-type-align-at max ] reduce ;