Forum > General

bugged compilation with the -Anasmwin32 option (FPC 3.2.2)

(1/1)

Avinash:

--- Code: Pascal  [+][-]window.onload = function(){var x1 = document.getElementById("main_content_section"); if (x1) { var x = document.getElementsByClassName("geshi");for (var i = 0; i < x.length; i++) { x[i].style.maxHeight='none'; x[i].style.height = Math.min(x[i].clientHeight+15,306)+'px'; x[i].style.resize = "vertical";}};} ---const A: Integer = 0;      B: Integer = 0; begin  A := 1;  B := 222;  WriteLn(' Ofs = ', Ofs(B) - Ofs(A));  WriteLn('  A  = ', A);  WriteLn('  B  = ', B);end.
by default compilation (fpc filename) the program produces the correct result:

 Ofs = 16
  A  = 1 
  B  = 222

but compiling with the -Anasmwin32 option I got

  B  = 0 
  B  = 222
  B  = 222

It's about 3.2.2

FPC 3.0.4 with the -Anasmwin32 outputs the correct

 Ofs = 2 
  A  = 1 
  B  = 222

PascalDragon:
Hmm, the assembly code at least looks correct on first glance... Please report a bug.

Navigation

[0] Message Index