fix printMessage to print to stdError

Macaulay2 · Dec 20, 2020 · 8ad88cd · 8ad88cd
1 parent b334095
commit 8ad88cd
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 5 deletions.
diff --git a/M2/Macaulay2/d/stdiop.d b/M2/Macaulay2/d/stdiop.d
@@ -127,12 +127,12 @@ cleanscreen():void := (
 printMessage(position:Position,message:string):void := (
      if !SuppressErrors then (
      	  cleanscreen();
-     	  stderr << position;
-	  if recursionDepth > 0 then stderr << "[" << recursionDepth << "]:";
+	  stdError << position;
+	  if recursionDepth > 0 then stdError << "[" << recursionDepth << "]:";
      	  -- gettid() is not there in Solaris
 	  -- tid := gettid();
-	  -- if tid != -1 && tid != getpid() then stderr << "<" << gettid() << ">:";
-	  stderr << " " << message << endl;
+	  -- if tid != -1 && tid != getpid() then stdError << "<" << gettid() << ">:";
+	  stdError << " " << message << endl;
 	  );
      );
 export printErrorMessage(position:Position,message:string):void := (

diff --git a/M2/Macaulay2/m2/testing.m2 b/M2/Macaulay2/m2/testing.m2
@@ -31,7 +31,7 @@ captureTestResult := (desc, teststring, pkg, usermode) -> (
     if isCapturable(teststring, pkg, true) then (
 	stderr << commentize pad("capturing " | desc, 72) << flush;
 	(err, output) := capture(teststring, Package => pkg, UserMode => usermode);
-	if err then printerr "capture failed; retrying in a subprocess ..." else return true);
+	if err then printerr "capture failed; retrying ..." else return true);
     -- fallback to using an external process
     stderr << commentize pad("running " | desc, 72) << flush;
     runString(teststring, pkg, usermode))