瀏覽代碼

Improved stream diagnostics for terminal

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7685 8c9fc860-2736-0410-a75d-ab315db34111
negelef 7 年之前
父節點
當前提交
5728744acd
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      source/Diagnostics.Mod

+ 1 - 1
source/Diagnostics.Mod

@@ -178,7 +178,7 @@ BEGIN
 	w.Char(Tab);
 	IF (source # "") THEN w.String (source); END;
 	IF (position # Invalid) THEN w.Char ('@'); w.Int(position, 0); END;
-	w.Char(Tab);
+	w.String(": ");
 	IF (type = TypeWarning) THEN
 		w.String("warning");
 	ELSIF (type = TypeError) THEN