let blit ~src ~src_index ~dst ~dst_index ~length =     try blit_exn ~src ~src_index ~dst ~dst_index ~length; return ()     with _ -> fail `out_of_bounds