Browse Source

- removed overflow, so the test also works with constant propagation and -Co

git-svn-id: trunk@33201 -
Jonas Maebe 9 years ago
parent
commit
70cd8f6e59
1 changed files with 2 additions and 2 deletions
  1. 2 2
      tests/webtbs/tw29620.pp

+ 2 - 2
tests/webtbs/tw29620.pp

@@ -1,12 +1,12 @@
 var x:uint64;
     y:longword;
 begin
- y:=123;
+ y:=12;
  x:=y*uint64(10116239910488455739);
  if x<>8365656051540097625 then
    halt(1);
  x:=y*uint64($8000000000000000);
- if x<>(uint64(123) shl 63) then
+ if x<>(uint64(12) shl 63) then
    halt(2);
 end.