mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-16 05:39:27 +02:00
13 lines
324 B
ObjectPascal
13 lines
324 B
ObjectPascal
{ %CPU=i386 }
|
|
{ %OPT= -Rintel }
|
|
|
|
{ Old file: tbs0042.pp }
|
|
{ shows assembler double operator expression problem OK 0.99.7 (PFV) }
|
|
|
|
Begin
|
|
asm
|
|
mov ax,3*-4 { evaluator stack underflow }
|
|
end; { due to two operators following each other }
|
|
end. { this will also happen in att syntax. }
|
|
|