anchor.diff:      CompilerWarningsAsErrors, WarnDeprecatedCode: BOOL;   // I4865   // I4866
       CallBack: TCompilerCallback; Target: Integer): Integer; cdecl;         // TODO: K9: Convert to Unicode
   
  -function CompileKeyboardFile(kmnFile, kmxFile: PChar; FSaveDebug, CompilerWarningsAsErrors, WarnDeprecatedCode: BOOL; CallBack: TCompilerCallback): Integer;   // I4865   // I4866
  -var
  -  ckf: TCompileKeyboardFile;
  +function LoadCompiler(CallBack: TCompilerCallback = nil): Boolean;
  +var
     s: string;
   begin
  -  //Result := 0;
  -
     if HKMCmpDll = 0 then
     begin
       s := FUnitTestKMCmpDllPath;
  
positive.code:     HKMCmpDll := LoadLibrary(PChar(s+kmcmpdll_lib));
      if HKMCmpDll = 0 then
      begin
        Callback(0, $8000, PAnsiChar(AnsiString('Could not load the compiler library '+s+kmcmpdll_lib+'.  '+   // I4706
          'Check that '+kmcmpdll_lib+' is in the program directory '+
          'and that it is not corrupt.'#13#10+'Windows error message: '+SysErrorMessage(GetLastError))));
        Result := -1;
        Exit;
      end;
    end;
  
    @ckf := GetProcAddress(HKMCmpDll, 'CompileKeyboardFile');
    if not Assigned(@ckf) then
  
negative.code: 
  function Compiler_Diagnostic(mode: Integer): Integer;
  var
    keyman_diagnostic: TKeyman_Diagnostic;
  begin
    if not LoadCompiler then Exit(-1);
  
    @keyman_diagnostic := GetProcAddress(HKMCmpDll, 'Keyman_Diagnostic');
    if Assigned(@keyman_diagnostic) then
  