diff options
| author | Ting-Wei Lan <lantw44@gmail.com> | 2019-05-18 12:08:49 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2019-05-18 12:10:15 +0200 |
| commit | 6b97415996583b15a97dad8254f610275353e913 (patch) | |
| tree | 51b50235c4a57e527d436d81ad674139cf083e86 | |
| parent | 1b0d2b2afc2ec38c025263005199dbcd347087c8 (diff) | |
| download | guix-6b97415996583b15a97dad8254f610275353e913.tar.gz | |
gremlin: Adjust tests for foreign distros.
Fixes <https://bugs.gnu.org/35775>.
* tests/gremlin.scm ("elf-dynamic-info-needed, executable"): Expect only
libguile and libc among NEEDED.
("strip-runpath"): Pass '--enable-new-dtags' to get RUNPATH, not RPATH.
| -rw-r--r-- | tests/gremlin.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/gremlin.scm b/tests/gremlin.scm index 77a5dc1998..b0bb7a8e49 100644 --- a/tests/gremlin.scm +++ b/tests/gremlin.scm @@ -52,7 +52,7 @@ (or (not dyninfo) ;static executable (lset<= string=? (list (string-append "libguile-" (effective-version)) - "libgc" "libunistring" "libffi") + "libc") (map (lambda (lib) (string-take lib (string-contains lib ".so"))) (elf-dynamic-info-needed dyninfo)))))) @@ -79,7 +79,7 @@ (lambda (port) (display "int main () { puts(\"hello\"); }" port))) (invoke c-compiler "t.c" - "-Wl,-rpath=/foo" "-Wl,-rpath=/bar") + "-Wl,--enable-new-dtags" "-Wl,-rpath=/foo" "-Wl,-rpath=/bar") (let* ((dyninfo (elf-dynamic-info (parse-elf (call-with-input-file "a.out" get-bytevector-all)))) |