blob: da82a56798603a30d59c1f3676e13cae46db5dd8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
{$macro on}
{$define aaa:=1234}
{$define bbb:=4321}
{$define ccc:=aaa} // here aaa is already defined macros
var
err : boolean;
begin
err:=true;
{$if aaa=ccc} // condition is equal
// but compiler not compiling this block, because
// don't take into account that value of macros ccc is macros also.
err:=false;
writeln('success');
{$else}
writeln('failure');
{$endif}
if err then
halt(1);
end.
|
