* Prevent multiply between qword and longint.

git-svn-id: trunk@7798 -
This commit is contained in:
daniel 2007-06-24 19:31:32 +00:00
parent 03951d793a
commit 1631ccf2cc

View File

@ -732,7 +732,7 @@ procedure teststringqword;
var
q1,q2 : qword;
s : string;
l : longint;
l : cardinal;
a : ansistring;
code : integer;