let concat_bigstring =  concat_gen Bigstring.create blit_to_bigstring