let
fmt_warn_bitsize_over_64 =
format_of_string
"bitsSize of %a > 64: not treated"