diff options
author | Pjotr Prins | 2015-12-26 19:37:02 +0300 |
---|---|---|
committer | Pjotr Prins | 2015-12-26 19:37:02 +0300 |
commit | b6207ab81cd2050fe66cb1d70a4341a58ecb8ce6 (patch) | |
tree | 205420644a4e344551a20f38995d03311e359ab0 | |
parent | a1fe2ca61e15738220aee34618fa75792d802554 (diff) | |
download | guix-bioinformatics-b6207ab81cd2050fe66cb1d70a4341a58ecb8ce6.tar.gz |
ldc: tzdata test fix
-rw-r--r-- | gn/packages/dlanguage.scm | 12 | ||||
-rw-r--r-- | ldc-disable-tests.patch | 11 |
2 files changed, 13 insertions, 10 deletions
diff --git a/gn/packages/dlanguage.scm b/gn/packages/dlanguage.scm index 38ac8b0..1aa71fd 100644 --- a/gn/packages/dlanguage.scm +++ b/gn/packages/dlanguage.scm @@ -23,6 +23,7 @@ #:use-module (guix download) #:use-module (guix build-system cmake) #:use-module (gnu packages textutils) + #:use-module (gnu packages base) #:use-module (gnu packages libedit) #:use-module (gnu packages llvm) #:use-module (gnu packages zip) @@ -81,7 +82,13 @@ (substitute* "runtime/phobos/std/process.d" (("/bin/sh") (which "sh")) (("echo") (which "echo"))) + (substitute* "runtime/phobos/std/datetime.d" + (("/usr/share/zoneinfo/") + (string-append (assoc-ref inputs "tzdata") + "/share/zoneinfo"))) #t)) + + (add-after 'unpack-dmd-testsuite-source 'patch-dmd-testsuite (lambda _ @@ -94,11 +101,12 @@ (inputs `( ("libconfig" ,libconfig) - ("libedit" ,libedit))) + ("libedit" ,libedit) + ("tzdata" ,tzdata)) ;; for tests (native-inputs `(("llvm" ,llvm) ("clang" ,clang) - ("unzip" ,unzip) + ("unzip" ,unzip) ;; for tests ("phobos-src" ;; runtime/phobos ,(origin (method url-fetch) diff --git a/ldc-disable-tests.patch b/ldc-disable-tests.patch index d88aa21..1e13ea6 100644 --- a/ldc-disable-tests.patch +++ b/ldc-disable-tests.patch @@ -1,20 +1,15 @@ diff --git a/std/datetime.d b/std/datetime.d -index 8e4ed3b..d904a49 100644 +index 8e4ed3b..1be9099 100644 --- a/std/datetime.d +++ b/std/datetime.d -@@ -28018,7 +28018,11 @@ public: +@@ -28018,6 +28018,7 @@ public: The default directory where the TZ Database files are. It's empty for Windows, since Windows doesn't have them. +/ -- enum defaultTZDatabaseDir = "/usr/share/zoneinfo/"; + -+ pragma(msg, "test disabled on GNU Guix"); -+ -+ // enum defaultTZDatabaseDir = "/usr/share/zoneinfo/"; -+ enum defaultTZDatabaseDir = ""; + enum defaultTZDatabaseDir = "/usr/share/zoneinfo/"; } else version(Windows) - { diff --git a/std/path.d b/std/path.d index 254d8f0..b0fc04d 100644 --- a/std/path.d |