let ssi_int (_ : ssi) : int32 = raise (Not_available "ssi_int")