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

* added missign begin..end pair (noticed by Carl)

Browse Source
This commit is contained in:
Jonas Maebe 2001-05-16 15:11:42 +00:00
parent 2d1da71091
commit 7ca4933913
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
compiler/i386/n386cal.pas
View File

@ -1029,8 +1029,10 @@ implementation
ungetregister32(right.location.register);
end
else
emit_ref(A_CALL,S_NO,newreference(right.location.reference));
del_reference(right.location.reference);
begin
emit_ref(A_CALL,S_NO,newreference(right.location.reference));
del_reference(right.location.reference);
end;
end;
end;
end;
@ -1549,7 +1551,10 @@ begin
end.
{
$Log$
Revision 1.22 2001-04-18 22:02:01 peter
Revision 1.23 2001-05-16 15:11:42 jonas
* added missign begin..end pair (noticed by Carl)
Revision 1.22 2001/04/18 22:02:01 peter
* registration of targets and assemblers
Revision 1.21 2001/04/13 01:22:18 peter