Browse Source

* release memory of newmodeinfo in graphexitproc

Jonas Maebe 25 years ago
parent
commit
2d01b922b6
1 changed files with 16 additions and 1 deletions
  1. 16 1
      rtl/inc/graph/graph.inc

+ 16 - 1
rtl/inc/graph/graph.inc

@@ -2329,6 +2329,18 @@ end;
        list:=list^.next;
        list:=list^.next;
        dispose(tmp);
        dispose(tmp);
      end;
      end;
+{$ifdef newmodes}
+   for c := lowNewDriver to highNewDriver do
+     begin
+       list := newModeList.modeinfo[c];
+       while assigned(list) do
+         begin
+           tmp := list;
+           list:=list^.next;
+           dispose(tmp);
+         end;
+     end;
+{$endif newmodes}
 {$IFDEF DPMI}
 {$IFDEF DPMI}
   { We had copied the buffer of mode information }
   { We had copied the buffer of mode information }
   { and allocated it dynamically... now free it  }
   { and allocated it dynamically... now free it  }
@@ -2391,7 +2403,10 @@ begin
 end;
 end;
 {
 {
   $Log$
   $Log$
-  Revision 1.34  2000-06-18 06:11:20  jonas
+  Revision 1.35  2000-06-18 08:11:53  jonas
+    * release memory of newmodeinfo in graphexitproc
+
+  Revision 1.34  2000/06/18 06:11:20  jonas
     + added missing detectMode stuff for -dnewmodes
     + added missing detectMode stuff for -dnewmodes
 
 
   Revision 1.33  2000/06/17 19:09:22  jonas
   Revision 1.33  2000/06/17 19:09:22  jonas