diff --git a/tests/test/trange1.pp b/tests/test/trange1.pp
index 28f14c1e5b..13cf4f19f9 100644
--- a/tests/test/trange1.pp
+++ b/tests/test/trange1.pp
@@ -114,7 +114,7 @@ begin
 { *********************** qword to longint ********************* }
   writeln;
   writeln('qword to longint');
-  q := $ffffffffffffffff;
+  q := qword($ffffffffffffffff);
   writeln(q);
   if not testlongint_qword(q,true) then
     writeln('test1 failed');