Explorar o código

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

git-svn-id: trunk@33201 -
Jonas Maebe %!s(int64=9) %!d(string=hai) anos
pai
achega
70cd8f6e59
Modificáronse 1 ficheiros con 2 adicións e 2 borrados
  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.