mike121 pushed a commit to branch master in repository guile. commit 50da05835a70daa36f74b23fe3a12d18d0cb6691 Author: Michael Gran <spk...@yahoo.com> AuthorDate: Mon Nov 23 19:53:38 2020 -0800
for socket test, don't presume TMP is usable * test-suite/tests/00-socket.test: don't abort when unable to change into tmpdir --- test-suite/tests/00-socket.test | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/test-suite/tests/00-socket.test b/test-suite/tests/00-socket.test index 7f55ade..3657628 100644 --- a/test-suite/tests/00-socket.test +++ b/test-suite/tests/00-socket.test @@ -1,7 +1,7 @@ ;;;; 00-socket.test --- test socket functions -*- scheme -*- ;;;; ;;;; Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010, -;;;; 2011, 2012, 2013, 2014, 2017 Free Software Foundation, Inc. +;;;; 2011, 2012, 2013, 2014, 2017, 2021 Free Software Foundation, Inc. ;;;; ;;;; This library is free software; you can redistribute it and/or ;;;; modify it under the terms of the GNU Lesser General Public @@ -153,7 +153,7 @@ ;; "unix address path too long: ~A" ;; ("/tmp/nix-build-fb7bph4ifh0vr3ihigm702dzffdnapfj-guile-coverage-1.9.5.drv-0/guile-test-socket-1258553296-77619") ;; #f) -(chdir %tmpdir) +(false-if-exception (chdir %tmpdir)) (define (temp-file-path) ;; Return a temporary file name, assuming the current directory is %TMPDIR.