mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-12 12:46:11 +02:00
+ bug0193
This commit is contained in:
parent
75331d6648
commit
b6c228b232
14
bugs/bug0193.pp
Normal file
14
bugs/bug0193.pp
Normal file
@ -0,0 +1,14 @@
|
|||||||
|
{$Q+}
|
||||||
|
var i: integer;
|
||||||
|
b: byte;
|
||||||
|
|
||||||
|
begin
|
||||||
|
i := 32767;
|
||||||
|
i := i + 15;
|
||||||
|
b := 255;
|
||||||
|
b := b + 18;
|
||||||
|
b := 255;
|
||||||
|
b := b * 8;
|
||||||
|
b := 255;
|
||||||
|
b := b * 17
|
||||||
|
End.
|
@ -255,4 +255,5 @@ bug0189.pp cant compare adresses of function variables !!
|
|||||||
bug0190.pp can't have typecast for var params ??
|
bug0190.pp can't have typecast for var params ??
|
||||||
bug0191.pp missing vecn constant evaluation
|
bug0191.pp missing vecn constant evaluation
|
||||||
bug0192.pp can't compare boolean result with true/false, because the
|
bug0192.pp can't compare boolean result with true/false, because the
|
||||||
boolean result is already in the flags
|
boolean result is already in the flags
|
||||||
|
bug0193.pp overflow checking for 8 and 16 bit operations wrong
|
||||||
|
Loading…
Reference in New Issue
Block a user