[Guile-commits] 01/02: Fix parallel test bug in r6rs-ports.test

[Andy Wingo]

wingo pushed a commit to branch main
in repository guile.

commit b93dc62e03ed4e774e5b55307ae960c1a769b90c
Author: Andy Wingo <wingo@pobox.com>
AuthorDate: Sun Jun 23 21:43:05 2024 +0200

    Fix parallel test bug in r6rs-ports.test
    
    * test-suite/tests/r6rs-ports.test (test-file): Use different file from
    ports.test, to avoid problems during parallel tests.
---
 test-suite/tests/r6rs-ports.test | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/test-suite/tests/r6rs-ports.test b/test-suite/tests/r6rs-ports.test
index 46b2a4307..dbcc89a93 100644
--- a/test-suite/tests/r6rs-ports.test
+++ b/test-suite/tests/r6rs-ports.test
@@ -1,6 +1,6 @@
 ;;;; r6rs-ports.test --- R6RS I/O port tests.   -*- coding: utf-8; -*-
 ;;;;
-;;;; Copyright (C) 2009-2012,2013-2015,2018-2021,2023 Free Software 
Foundation, Inc.
+;;;; Copyright (C) 2009-2012,2013-2015,2018-2021,2023,2024-2024 Free Software 
Foundation, Inc.
 ;;;; Ludovic Courtès
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
@@ -38,7 +38,7 @@
                        body0 body ...)))))))
 
 (define (test-file)
-  (data-file-name "ports-test.tmp"))
+  (data-file-name "r6rs-ports-test.tmp"))
 
 ;; A input/output port that swallows all output, and produces just
 ;; spaces on input.  Reading and writing beyond `failure-position'