Преглед изворни кода

Improved build description

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@8658 8c9fc860-2736-0410-a75d-ab315db34111
negelef пре 6 година
родитељ
комит
c36b85cef3
1 измењених фајлова са 2 додато и 2 уклоњено
  1. 2 2
      source/Unix.Environment.Mod

+ 2 - 2
source/Unix.Environment.Mod

@@ -142,8 +142,8 @@ BEGIN {UNCOOPERATIVE, UNCHECKED}
 END Terminate;
 
 BEGIN
-	Trace.String ("Build "); Trace.String (SYSTEM.Date); Trace.String (" (Unix, ");
-	Trace.String ("GC, ");
+	Trace.String ("Build "); Trace.String (SYSTEM.Date); Trace.String (" (");
+	Trace.String (Unix.Version); Trace.String (", GC, ");
 	Trace.Int (Processors.count, 0); Trace.String (" CPU");
 	IF Processors.count > 1 THEN Trace.Char ('s') END; Trace.String (", ");
 	Trace.Int (SIZE OF ADDRESS * 8, 0); Trace.String ("-bit)"); Trace.Ln;