summaryrefslogtreecommitdiff
path: root/tests/gremlin.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2018-08-21 23:11:07 +0200
committerLudovic Courtès <ludo@gnu.org>2018-08-21 23:27:08 +0200
commitf7dfda2c73a0c4f09b105cafb29c45cf594e4ba9 (patch)
treea3e56a82a7fcb8d3c9f102f896a18d6ac8896336 /tests/gremlin.scm
parentf43d2dcd80c201600fb161f0f3076daaccc46a2c (diff)
gremlin: 'elf-dynamic-info-needed' test is no longer skipped.
* tests/gremlin.scm (%guile-executable): Use /proc/self/exe instead of (command-line). For a while now, the first element of (command-line) was "./build-aux/test-driver.scm"; consequently the test was always skipped.
Diffstat (limited to 'tests/gremlin.scm')
-rw-r--r--tests/gremlin.scm6
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/gremlin.scm b/tests/gremlin.scm
index 2885554967b..f1089e7da6d 100644
--- a/tests/gremlin.scm
+++ b/tests/gremlin.scm
@@ -1,5 +1,5 @@
1;;; GNU Guix --- Functional package management for GNU 1;;; GNU Guix --- Functional package management for GNU
2;;; Copyright © 2015 Ludovic Courtès <ludo@gnu.org> 2;;; Copyright © 2015, 2018 Ludovic Courtès <ludo@gnu.org>
3;;; 3;;;
4;;; This file is part of GNU Guix. 4;;; This file is part of GNU Guix.
5;;; 5;;;
@@ -27,8 +27,8 @@
27 #:use-module (ice-9 match)) 27 #:use-module (ice-9 match))
28 28
29(define %guile-executable 29(define %guile-executable
30 (match (command-line) 30 (match (false-if-exception (readlink "/proc/self/exe"))
31 ((program . _) 31 ((? string? program)
32 (and (file-exists? program) (elf-file? program) 32 (and (file-exists? program) (elf-file? program)
33 program)) 33 program))
34 (_ 34 (_