Compile subroutine OEngineInit(void) #pragma SRP_Precompiler $Insert ENVIRON_CONSTANTS Declare subroutine Set_Env, GetEngineVersion Declare function RTI_Xlate_Controller Version = '' GetEngineVersion(Version) MajorVersion = Version[1, 'F.'] If MajorVersion GE 10 then // Stopgap performance fix for OI 10.2.2 RC1. Revelation will re-enable caching by default in 10.2.2 RC2. // Do not invoke this in OI 9 as the function does not exist! rv = RTI_Xlate_Controller('EnableCache') end Set_Env(ENV_DEBUGGER_ENABLED$, 2, 1) Set_Env(ENV_DEBUGGER_INTERCEPT_PROC$,'SERVICE_MANAGER_DEBUGGER_INTERCEPT',1) return