24 lines
642 B
Plaintext
24 lines
642 B
Plaintext
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
|
|
|
|
|