paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-17 05:39:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* concatcopy with len=0 exits now immediatly

Browse Source
This commit is contained in:
florian 2004-03-31 19:13:04 +00:00
parent 332d0c1ac3
commit 6e4b98f913
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/arm/cgcpu.pas
View File

@ -1089,6 +1089,8 @@ unit cgcpu;
end; end;
begin begin
if len=0 then
exit;
helpsize:=12; helpsize:=12;
dstref:=dest; dstref:=dest;
srcref:=source; srcref:=source;
@ -1329,7 +1331,10 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.50 2004-03-29 19:19:35 florian Revision 1.51 2004-03-31 19:13:04 florian
* concatcopy with len=0 exits now immediatly
Revision 1.50 2004/03/29 19:19:35 florian
+ arm floating point register saving implemented + arm floating point register saving implemented
* hopefully stabs generation for MacOSX fixed * hopefully stabs generation for MacOSX fixed
+ some defines for arm added + some defines for arm added