diff --git a/tests/test/cg/taddcard.pp b/tests/test/cg/taddcard.pp
index 67cf418ccf..a99dac6000 100644
--- a/tests/test/cg/taddcard.pp
+++ b/tests/test/cg/taddcard.pp
@@ -106,6 +106,11 @@ begin
  i := i * 10 * j * i * j * 16 * k;
  if i <> 256000 then
     result := false;
+ i := 100000;
+ j := 100;
+ i := i * j;
+ if i <> 10000000 then
+   result := false;
  if not result then
   WriteLn('Failure.')
  else