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

* fixed dec -> sub $1 opt which didn't set ops=2

Browse Source
This commit is contained in:
peter 1999-05-02 14:26:31 +00:00
parent b2e44e6445
commit 8bf7af6b29
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/popt386.pas
View File

@ -1368,6 +1368,7 @@ Begin
End; End;
Pai386(hp1)^.Loadoper(1,Pai386(hp1)^.oper[0]); Pai386(hp1)^.Loadoper(1,Pai386(hp1)^.oper[0]);
Pai386(hp1)^.LoadConst(0,1); Pai386(hp1)^.LoadConst(0,1);
Pai386(hp1)^.ops:=2;
End End
End; End;
hp1 := pai(p^.next); hp1 := pai(p^.next);
@ -1507,7 +1508,10 @@ End.
{ {
$Log$ $Log$
Revision 1.48 1999-05-01 13:24:34 peter Revision 1.49 1999-05-02 14:26:31 peter
* fixed dec -> sub $1 opt which didn't set ops=2
Revision 1.48 1999/05/01 13:24:34 peter
* merged nasm compiler * merged nasm compiler
* old asm moved to oldasm/ * old asm moved to oldasm/