Procházet zdrojové kódy

reset compiling_module in doneparser

peter před 20 roky
rodič
revize
29bffd83b2
1 změnil soubory, kde provedl 6 přidání a 1 odebrání
  1. 6 1
      compiler/parser.pas

+ 6 - 1
compiler/parser.pas

@@ -73,6 +73,7 @@ implementation
          current_module:=nil;
          current_module:=nil;
          compiled_module:=nil;
          compiled_module:=nil;
          current_procinfo:=nil;
          current_procinfo:=nil;
+         SetCompileModule(nil);
 
 
          loaded_units:=TLinkedList.Create;
          loaded_units:=TLinkedList.Create;
 
 
@@ -135,6 +136,7 @@ implementation
          current_module:=nil;
          current_module:=nil;
          compiled_module:=nil;
          compiled_module:=nil;
          current_procinfo:=nil;
          current_procinfo:=nil;
+         SetCompileModule(nil);
 
 
          { unload units }
          { unload units }
          loaded_units.free;
          loaded_units.free;
@@ -665,7 +667,10 @@ implementation
 end.
 end.
 {
 {
   $Log$
   $Log$
-  Revision 1.75  2005-02-14 17:13:07  peter
+  Revision 1.76  2005-04-25 08:15:17  peter
+  reset compiling_module in doneparser
+
+  Revision 1.75  2005/02/14 17:13:07  peter
     * truncate log
     * truncate log
 
 
   Revision 1.74  2005/02/10 20:06:34  peter
   Revision 1.74  2005/02/10 20:06:34  peter