diff --git a/TestSuite/arithm13.pas b/TestSuite/arithm13.pas
new file mode 100644
index 000000000..cc44b544e
--- /dev/null
+++ b/TestSuite/arithm13.pas
@@ -0,0 +1,4 @@
+begin
+  var a: longword := 2000000000;
+  assert(a * 2 = 4000000000);
+end.
\ No newline at end of file