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