blob: 6838a80fcf8cd6165955cf701e0f0bb8b1e453a5 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
{ %CPU=i386 }
{ %OPT=-Cg- }
{ Old file: tbs0175.pp }
{ Asm, mov word,%eax should not be allowed without casting emits a warning (or error with range checking enabled) OK 0.99.11 (PM) }
{ this will just give out a warning }
{$asmmode att}
{$R-}
var
w : word;
begin
asm
movl w,%ecx
end;
end.
|
