paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-15 10:29:29 +02:00
Code Issues Packages Projects Releases Wiki Activity

* compilation fix

Browse Source 
git-svn-id: branches/avr@17021 -
This commit is contained in:
florian 2011-02-26 20:56:36 +00:00
parent d5455cf6ac
commit b4d4d4b208
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/inc/generic.inc
View File

@ -1326,7 +1326,7 @@ end;
HandleErrorFrame(215,get_frame);
if sign then
fpc_mul_integer=-q3
fpc_mul_integer:=-q3
else
fpc_mul_integer:=q3;
end;
@ -1402,7 +1402,7 @@ end;
HandleErrorFrame(215,get_frame);
if sign then
fpc_mul_longint=-q3
fpc_mul_longint:=-q3
else
fpc_mul_longint:=q3;
end;