likely bug in FPC v3.2.2

[440bx]

Hello,

Consider this code:

Code: Pascal  [Select][+][-]

1. {$APPTYPE CONSOLE}
2.  
3. program _ComparisonOperators;
4.  
5. var
6.   ADword, AnotherDword : DWORD;
7.  
8.  
9. begin
10.  
11.   ADword       := $48;
12.   AnotherDword := $BC;
13.  
14.   if ADword >- AnotherDword then
15.   begin
16.     writeln(ADword, ' is >- ', AnotherDword, ' (whatever that means!)');
17.   end;
18.  
19.   readln;
20. end.

Note the likely invalid comparison operator in use ">-", yet the compiler doesn't complain.  Running the program shows the comparison is TRUE.

Comments welcome.

ETA:

As correctly pointed out by GAN below, there is no bug.  The compiler "sees" >- as "greater than minus (whatever follows)" which is correct.

[GAN]

Hello, a very simple answer/comment:

I think the compiler replace with integer values before de comparision, so:

Code: Pascal  [Select][+][-]

1. if ADword 72 > -188 then
2.  

yes, it is True.

[440bx]

Hello, a very simple answer/comment:

I think the compiler replace with integer values before de comparision, so:

Code: Pascal  [Select][+][-]

1. if ADword 72 > -188 then
2.  

yes, it is True.

You are absolutely right.  I didn't think of that and, now that you've pointed it out, it looks obvious.

Thank you!

Conclusion: no bug in the compiler.  bug in OP's brain that caused incorrect expression parsing