4be> ( seq -- x )

Vocabulary

endian.private

Inputs

seq

an object

Outputs

x

an object

Definition

USING: alien.c-types alien.data endian ;

IN: endian.private

: 4be> ( seq -- x )
    big-endian [ uint32_t deref ] [ 4 n-be> ] if-endian ;