mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-02 20:30:29 +02:00
* Prevent multiply between qword and longint.
git-svn-id: trunk@7798 -
This commit is contained in:
parent
03951d793a
commit
1631ccf2cc
@ -732,7 +732,7 @@ procedure teststringqword;
|
||||
var
|
||||
q1,q2 : qword;
|
||||
s : string;
|
||||
l : longint;
|
||||
l : cardinal;
|
||||
a : ansistring;
|
||||
code : integer;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user