Browse Source

* esi is never deallocated anymore in methods

Jonas Maebe 25 years ago
parent
commit
88652eee6b
1 changed files with 6 additions and 2 deletions
  1. 6 2
      compiler/tgeni386.pas

+ 6 - 2
compiler/tgeni386.pas

@@ -355,7 +355,8 @@ implementation
 
 
       begin
       begin
 {$ifndef noAllocEdi}
 {$ifndef noAllocEdi}
-         if r in [R_ESI,R_EDI] then
+         if (r = R_EDI) or
+            ((not assigned(procinfo^._class)) and (r = R_ESI)) then
            begin
            begin
              exprasmlist^.concat(new(pairegalloc,dealloc(r)));
              exprasmlist^.concat(new(pairegalloc,dealloc(r)));
              exit;
              exit;
@@ -630,7 +631,10 @@ begin
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.40  2000-02-09 13:23:08  peter
+  Revision 1.41  2000-02-10 11:27:18  jonas
+    * esi is never deallocated anymore in methods
+
+  Revision 1.40  2000/02/09 13:23:08  peter
     * log truncated
     * log truncated
 
 
   Revision 1.39  2000/01/21 12:17:42  jonas
   Revision 1.39  2000/01/21 12:17:42  jonas