mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-06 01:47:59 +02:00
d0dd3bd74e
* allow -128 to 255 as a constant for instructions taking a byte sized constants (this is also what GNU As accepts), resolves #32039 git-svn-id: trunk@38316 -
10 lines
92 B
ObjectPascal
10 lines
92 B
ObjectPascal
{ %cpu=avr }
|
|
{ %norun }
|
|
const
|
|
foo = %00011000;
|
|
begin
|
|
asm
|
|
andi r16, ~foo
|
|
end;
|
|
end.
|