anchor.diff:    TSmartMobileStudioExternalCompiler = class(TSmartMobileStudioCustomScriptTest)
     strict private
       FPipedExecution: TPipedExecution;
  +    FExitCode: Integer;
       procedure PipedExecutionExitHandler(Sender: TObject; ExitCode: Cardinal);
       procedure PipedExecutionNewLineHandler(Sender: TObject; const Text: string);
     protected
  
positive.code: begin
    inherited;
  
    while Assigned(FPipedExecution) do
      FPipedExecution.Peek;
  end;
  
negative.code: begin
    inherited;
  
    FExitCode := 0;
  
    FPipedExecution := TPipedExecution.Create('smsc.exe -unit-path=.\RTL\ ' +
      ScriptFileName, '.', PipedExecutionNewLineHandler, PipedExecutionExitHandler);
  end;
  