tie into appveyor test results api

1 files changed, 10 insertions, 0 deletions

diff --git a/tests/testament/tester.nim b/tests/testament/tester.nim
index 636093a7f..c6cd90438 100644
--- a/tests/testament/tester.nim
+++ b/tests/testament/tester.nim
@@ -164,6 +164,16 @@ proc addResult(r: var TResults, test: TTest,
     styledEcho fgYellow, "Gotten:"
     styledEcho styleBright, given, "\n"
 
+  if existsEnv("APPVEYOR"):
+    let (outcome, msg) =
+      if success == reSuccess:
+        ("Passed", "")
+      elif success == reIgnored:
+        ("Skipped", "")
+      else:
+        ("Failed", "Expected:" & expected & "\n" & "Gotten:" & given & "\n")
+    discard execProcess("appveyor", args=["AddTest", name, "-Framework", test.cat.string, "-FileName", $test.name, "-Outcome", outcome, "-ErrorMessage", msg], options={poStdErrToStdOut, poUsePath})
+
 proc cmpMsgs(r: var TResults, expected, given: TSpec, test: TTest) =
   if strip(expected.msg) notin strip(given.msg):
     r.addResult(test, expected.msg, given.msg, reMsgsDiffer)