compare.pas: It seems to work now