The Free Pascal Compiler does not give an error when compiling an if-then statement that has no "then" statement. For example:
program project1;
procedure AnyProc;
var
Int1,Int2:integer;
begin
Int1:=0;
Int2:=0;
if Int1=Int2 then
end;
begin
AnyProc;
end.
This program compiles and runs without an error. Is this a bug?
It works whether or not the "then" is followed by a semicolon.
Windows 7, FPC 2.6.4 [2014/03/06] for i386