From 59ae58fd31d63c261372bd5a36765328583bc1b6 Mon Sep 17 00:00:00 2001
From: Benoit Germain <benoit.germain@ubisoft.com>
Date: Fri, 20 Dec 2024 17:21:32 +0100
Subject: Make VS Test Explorer happy by absorbing the text output of legacy
 tests

---
 tests/error.lua | 18 ++++++++++++++----
 1 file changed, 14 insertions(+), 4 deletions(-)

(limited to 'tests')

diff --git a/tests/error.lua b/tests/error.lua
index a1ba1ce..243dd57 100644
--- a/tests/error.lua
+++ b/tests/error.lua
@@ -1,9 +1,19 @@
 --
 -- Error reporting
 --
+local function PRINT(...)
+    local str=""
+    for i=1,select('#',...) do
+        str= str..tostring(select(i,...)).."\t"
+    end
+    if io then
+        io.stderr:write(str.."\n")
+    end
+end
+
 local which_tests, remaining_tests = {}, {}
 for k,v in ipairs{...} do
-    print("got arg:", type(v), tostring(v))
+    PRINT("got arg:", type(v), tostring(v))
     which_tests[v] = true
     remaining_tests[v] = true
 end
@@ -27,7 +37,7 @@ local WR = function(...)
         if type(v) == "function" then
             local infos = debug.getinfo(v)
             --[[for k,v in pairs(infos) do
-                print(k,v)
+                PRINT(k,v)
             end]]
             v = infos.source..":"..infos.linedefined
         end
@@ -115,7 +125,7 @@ local configure_tests = function()
             (lane_error and tostring(lane_error) or "no error") .. " in lane",
             (finalizer and "with" or "without").. " finalizer" .. ((finalizer and finalizer_error) and " raising " .. tostring(finalizer_error) or "")
         }, ", ")
-        print(test_header)
+        PRINT(test_header)
         test_settings[test_header] = { level, lane_error, finalizer, finalizer_error }
     end
     -- can't store nil in tables, use null instead
@@ -240,4 +250,4 @@ end
 local unknown_test, val = next(remaining_tests)
 assert(not unknown_test, tostring(unknown_test) .. " test is unknown")
 
-print "\nTHE END"
+PRINT "\nTHE END"
-- 
cgit v1.2.3-55-g6feb