anchor.diff:  
   uses
     Classes, variants, sysutils,
  -  mArrays, mNullables;
  +  mArrays;
   
   const
     sInvalidString = 1;
  
positive.code:     // Lexical Analyzer Function http://www.gnu.org/software/bison/manual/html_node/Lexical.html
      procedure yylex (var lexState: TLexState; var lexResult : TLexResult);
      // double
      procedure StartCalculate(var resValue: double; var lexState: TLexState; var lexResult : TLexResult);
      procedure Calc6(var resValue: double; var lexState: TLexState; var lexResult : TLexResult);
      procedure Calc5(var resValue: double; var lexState: TLexState; var lexResult : TLexResult);
      procedure Calc4(var resValue: double; var lexState: TLexState; var lexResult : TLexResult);
  
negative.code:   raise TParserException.Create(ComposeErrorString(aErrorCode));
  end;
  
  procedure TKAParser.StartCalculate(out resValue: double; var lexState: TLexState; var lexResult : TLexResult);
  begin
    resValue := 0;
    Calc6(resValue, lexState, lexResult);
    while (lexResult.Token = tkSEMICOLON) do
    begin
  