let set_uint31 str off v =
      (if (off < 0) || (off > ((String.length str) - 4))
       then raise (Invalid_argument "index out of bounds")
       else ();
       unsafe_set_uint31 str off v)