littletest37.out

来自「格式化源码的最新板」· OUT 代码 · 共 19 行

unit littletest37;

interface

implementation

const
  monkey = integer($80000000);
  soy    = integer($40000000);

procedure foo;
begin
  asm
           MOV     EAX,monkey or soy
  end;
end;

end.