From 4b5785dee7ec3752e7eb6217412933da9d565b12 Mon Sep 17 00:00:00 2001 From: retropikzel Date: Sun, 19 Jul 2026 17:03:44 +0300 Subject: [PATCH] tap,junit: Readme updates --- retropikzel/junit/README.md | 16 ---------------- retropikzel/junit/VERSION | 2 +- retropikzel/tap/README.md | 16 ---------------- retropikzel/tap/VERSION | 2 +- test-headers.scm | 10 +--------- test-headers.sps | 12 ++---------- 6 files changed, 5 insertions(+), 53 deletions(-) diff --git a/retropikzel/junit/README.md b/retropikzel/junit/README.md index ca9fcbb..a16822d 100644 --- a/retropikzel/junit/README.md +++ b/retropikzel/junit/README.md @@ -14,22 +14,6 @@ JUnit, output for SRFI-64 -## Jenkins usage tip - -Use JUnit test runner in Jenkins and output to file, use TAP anywhere else and -output to stdout. - -(cond - ;; In Jenkins - ((get-environment-variable "JENKINS_URL") - (let ((junit-file "junit-result.xml")) - (test-runner-current (junit-runner)) - (when (file-exists? junit-file) (delete-file junit-file)) - (set-junit-runner-output-port! (open-output-file junit-file)))) - (else (test-runner-current (tap-runner)))) - - - ## Reference (**junit-runner**) diff --git a/retropikzel/junit/VERSION b/retropikzel/junit/VERSION index 0d91a54..9e11b32 100644 --- a/retropikzel/junit/VERSION +++ b/retropikzel/junit/VERSION @@ -1 +1 @@ -0.3.0 +0.3.1 diff --git a/retropikzel/tap/README.md b/retropikzel/tap/README.md index 9039b61..5d055e1 100644 --- a/retropikzel/tap/README.md +++ b/retropikzel/tap/README.md @@ -14,22 +14,6 @@ TAP output for SRFI-64 -## Jenkins usage tip - -Use JUnit test runner in Jenkins and output to file, use TAP anywhere else and -output to stdout. - -(cond - ;; In Jenkins - ((get-environment-variable "JENKINS_URL") - (let ((junit-file "junit-result.xml")) - (test-runner-current (junit-runner)) - (when (file-exists? junit-file) (delete-file junit-file)) - (set-junit-runner-output-port! (open-output-file junit-file)))) - (else (test-runner-current (tap-runner)))) - - - ## Reference (**tap-runner**) diff --git a/retropikzel/tap/VERSION b/retropikzel/tap/VERSION index 0ea3a94..0c62199 100644 --- a/retropikzel/tap/VERSION +++ b/retropikzel/tap/VERSION @@ -1 +1 @@ -0.2.0 +0.2.1 diff --git a/test-headers.scm b/test-headers.scm index c05020b..21d22b6 100644 --- a/test-headers.scm +++ b/test-headers.scm @@ -5,15 +5,7 @@ (scheme file) (scheme process-context) (retropikzel tap) - (retropikzel junit) (retropikzel LIBRARY) (srfi 64)) -(cond - ;; In Jenkins - ((get-environment-variable "WORKSPACE") - (let ((junit-file "junit-result.xml")) - (test-runner-current (junit-runner)) - (when (file-exists? junit-file) (delete-file junit-file)) - (set-junit-runner-output-port! (open-output-file junit-file)))) - (else (test-runner-current (tap-runner)))) +(test-runner-current (tap-runner)) diff --git a/test-headers.sps b/test-headers.sps index 7706e03..f966bee 100644 --- a/test-headers.sps +++ b/test-headers.sps @@ -1,15 +1,7 @@ -(import (except (rnrs) delete-file) +(import (rnrs) (retropikzel tap) - (retropikzel junit) (retropikzel LIBRARY) (srfi :64) (srfi :98)) -(cond - ;; In Jenkins - ((get-environment-variable "WORKSPACE") - (let ((junit-file "junit-result.xml")) - (test-runner-current (junit-runner)) - (when (file-exists? junit-file) (delete-file junit-file)) - (set-junit-runner-output-port! (open-output-file junit-file)))) - (else (test-runner-current (tap-runner)))) +(test-runner-current (tap-runner))