Przeglądaj źródła

do not use TRACE to avoid implicit import of KernelLog - makes a problem while building the release

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@6598 8c9fc860-2736-0410-a75d-ab315db34111
eth.morozova 9 lat temu
rodzic
commit
5306dbd529
1 zmienionych plików z 2 dodań i 2 usunięć
  1. 2 2
      source/Generic.Modules.Mod

+ 2 - 2
source/Generic.Modules.Mod

@@ -325,7 +325,7 @@ VAR callagain: BOOLEAN;
 PROCEDURE Initialize0*(module: Module);
 VAR new: BOOLEAN;
 BEGIN
-	TRACE(module.name);
+	(*TRACE(module.name);*)
 	(* module MUST have been removed from register list and must not have been initialized yet *)
 	ASSERT(module.next = NIL);
 	Publish (module, new);
@@ -960,7 +960,7 @@ END GetKernelProc;
 
 PROCEDURE Register- (module {UNTRACED}: Module);
 BEGIN {UNCOOPERATIVE, UNCHECKED}
-	TRACE(module.name);
+	(*TRACE(module.name);*)
 	IF register.first = NIL THEN
 		register.first := module;
 	ELSE