anchor.diff:      ModeReadOnly:= true;
   
       if (AText=cConsoleTracebackMsg) or
  -      SBeginsWith(AText, cConsoleSyntaxErrorMsg) then
  +      SBeginsWith(AText, cConsoleSyntaxErrorMsg) or
  +      SBeginsWith(AText, cConsoleNoteMsg) then
       begin
         Inc(ErrorCounter);
         if Assigned(FOnNumberChange) then
  
positive.code:   Str:= Ed.Strings.Lines[ALineIndex];
  
    bMsgPrompt:= SBeginsWith(Str, cConsolePrompt);
    bMsgNote:= SBeginsWith(Str, 'NOTE: ');
    bMsgError:= (Str=cConsoleTracebackMsg) or
      SRegexMatchesString(Str, '^[a-zA-Z][\w\.]*Error: .+', true);
  
  
negative.code:   cConsolePrintPrefix = '=';
    cConsoleTracebackMsg = 'Traceback (most recent call last):';
    cConsoleSyntaxErrorMsg = 'SyntaxError: ';
    cConsoleNoteMsg = 'NOTE: ';
  
  implementation
  
  