pack_be_u32 Subroutine

private pure subroutine pack_be_u32(n, out)

Pack an UNSIGNED 32-bit length prefix from an int64 value in [0, 4294967295]. Takes int64 so a length in (2^31-1, 2^32-1] — legitimate for large COPY_SOLUTION replies — never round-trips through int32 (an out-of-range conversion, processor-dependent). Inverse of =be_u32_to_i64=.

Arguments

Type IntentOptional Attributes Name
integer(kind=int64), intent(in) :: n
integer(kind=int8), intent(out) :: out(4)