sig val rctxt : OASISContext.t ref module BaseSetup = Compat_0_4.BaseSetup val adapt_setup_t : BaseSetup.t -> BaseSetup.t end