paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-16 13:59:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ new test for overflow checking qword multiplication with high(qword)

Browse Source 
git-svn-id: trunk@9522 -
This commit is contained in:
Jonas Maebe 2007-12-23 21:18:59 +00:00
parent 537319385b
commit 58600c71b9
2 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
.gitattributes vendored
View File

@ -7138,6 +7138,7 @@ tests/test/tint2str2.pp svneol=native#text/plain
tests/test/tint641.pp svneol=native#text/plain
tests/test/tint642.pp svneol=native#text/plain
tests/test/tint643.pp svneol=native#text/plain
tests/test/tint644.pp svneol=native#text/plain
tests/test/tinterface1.pp svneol=native#text/plain
tests/test/tinterface2.pp svneol=native#text/plain
tests/test/tinterface3.pp svneol=native#text/plain

9
tests/test/tint644.pp Normal file
View File

@ -0,0 +1,9 @@
{ %result=215 }
{$q+}
var
c: qword;
begin
c:=2;
c:=c*qword($ffffffffffffffff);
end.