1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:

          A:= NextR(i);
          if Tokens[A].Kind=tokEmpty then
            TE_FunctionCall(tmp.GetObject).Arguments:= nil
          else
            TE_FunctionCall(tmp.GetObject).Arguments:= Tokens[A].Expr;
          Tokens[A].Expr:= nil;
          Tokens[a].Kind:= tokVoid;
          Tokens[i].Expr:= tmp;
        end;
      end; // Zeile 10

    //finally, operators
    // Note: this wastes some extra iterations per Prio-Class, just ignore that, okay?
    for A:= 0 to high(Expressions) do begin
      for i:= L to R do
        if (Tokens[i].Kind=tokOperator) and
           (Expressions[Tokens[i].OpIdx].P=Expressions[A].P) then begin
          eid:= Tokens[i].OpIdx;
          rr:= NextR(i);
          ll:= NextL(i); // Zeile 20

          if rr<0 then
            raise ESyntaxError.CreateFmt('Position %d: Operator has no RHS',[Tokens[i].Pos]);

          if Tokens[rr].Kind<>tokExpression then
            raise ESyntaxError.CreateFmt('Position %d: expected expression, found %s',[Tokens[rr].Pos, Tokens[rr].Value]);
 // Zeile 27
          if (Expressions[eid].Cls = TE_Subtraction) and
             ((ll<0) or (Tokens[ll].Kind<>tokExpression)) then begin
            tmp:= TE_Negation.Create;//Zeile 30
            tmp.RHS:= Tokens[rr].Expr;
          end else begin
            tmp:= Expressions[eid].Cls.Create;

            tmp.RHS:= Tokens[rr].Expr;
            if not Expressions[eid].Unary then begin
              if ll<0 then
                raise ESyntaxError.CreateFmt('Position %d: Operator has no LHS',[Tokens[i].Pos]);
              if Tokens[ll].Kind<>tokExpression then
                raise ESyntaxError.CreateFmt('Position %d: expected expression, found %s',[Tokens[ll].Pos, Tokens[ll].Value]); //Zeile 40
              tmp.LHS:= Tokens[ll].Expr;
1           end;
2         end;
3       end;
4     end;
5   end;                    

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:

KeinHighlighter;
end
end
  end
  end
    end
    end
  end
  end
  end
end//10
end
end
end
end
end
end
end
end
end
end//20
end
end
end
end
end
end
end
end
end
end//30
end
end
end
end
end
end
end
end
end
end//40
end
end
end
end
end
end
end
end
end
end //50                    

1:
2:
3:

end
    end
        end                    

1:
2:
3:

end
end
end                    

1:

Mozilla/5.0 (Windows NT 6.1; WOW64; rv:10.0) Gecko/20100101 Firefox/10.0