littletest37.obs

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

unit littletest37;interface implementation const monkey=integer($80000000);soy=integer
($40000000);procedure foo;begin asm
mov eax,monkey or soy
end;end;end.