added rtioengineinit to sysprog

This commit is contained in:
Infineon\StieberD 2024-11-05 11:49:16 -07:00 committed by Stieber Daniel (CSC FI SPS MESLEO)
parent 2ad0386055
commit b84cfb970f

View File

@ -0,0 +1,19 @@
Compile subroutine RtiOEngineInit(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
return