mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-07 22:27:57 +02:00
e58bad8eef
warning (on the i8086 target) or an error (on i386 and x86_64) when this instruction is used (because it only works on 8086 and 8088 CPUs) git-svn-id: trunk@37514 -
13 lines
140 B
ObjectPascal
13 lines
140 B
ObjectPascal
{ %CPU=i386,x86_64 }
|
|
{ %fail }
|
|
|
|
{ Pop CS should produce an error on i386 and x86_64 }
|
|
|
|
{$asmmode intel}
|
|
|
|
begin
|
|
asm
|
|
pop cs
|
|
end;
|
|
end.
|