freepascal.compiler/tests/tbs0175.pp

var
  w : word;
begin
  asm
        movl w,%ecx
  end;
end.