About bug report 2181: why 9985 in [1, 2]? M := 9985; if M in [1, 2] then WriteLn ('Error!'); I tryed it with fpc 1.1. There is consistent pattern: for m:= 1 to n do if (m*256+x) in [x] then writeln(m);