guile-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Guile-commits] 02/13: for socket test, don't presume TMP is usable


From: Mike Gran
Subject: [Guile-commits] 02/13: for socket test, don't presume TMP is usable
Date: Thu, 21 Jan 2021 19:06:14 -0500 (EST)

mike121 pushed a commit to branch master
in repository guile.

commit 50da05835a70daa36f74b23fe3a12d18d0cb6691
Author: Michael Gran <spk121@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.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]