flcop

My test in FPC, the result is 7, so don't rely on the order.

{$B} will also effect the compiler directive.

I also found many funs in math, for example: function Mean(const Data: array of Single): Single; begin Result := SUM(Data) / (High(Data) - Low(Data) + 1); end; delphi usually uses "(High(Data) - Low(Data) + 1)" to get the length, and FPC uses “High(Data)+1”(fortunately，I had never seen "Succ(High(L)")，so why it just not use the concise and readable "Length(Data)"?

It seems to exist for a long time, may be from delphi2005, when I omission the 3rd argument, it should be a compile error, but it works 🙂 .