all messages for Guix-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
blob 8a209f86252d4b7619222995c21d8faca5ce50ca 3308 bytes (raw)
name: gnu/packages/patches/ldc-bootstrap-disable-tests.patch 	 # note: path name is non-authoritative(*)

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
 
This patch fixes a failing unit test by feeding buildNormalizedPath to the
tzdata properly.  Three other tests are disabled, one assumes /root and the
two others use networking.  Not bad out of almost 700 tests!

by Pjotr Prins <pjotr.guix@thebird.nl>

--- a/std/datetime.d.orig      2016-11-24 01:13:52.584495545 +0100
+++ b/std/datetime.d   2016-11-24 01:17:09.655306728 +0100
@@ -26758,8 +26758,8 @@ auto tz = TimeZone.getTimeZone("America/Los_Angeles");
         // leaving it commented out until I can sort it out.
         //assert(equal(tzNames, tzNames.uniq()));

-        foreach(tzName; tzNames)
-            assertNotThrown!DateTimeException(testPZSuccess(tzName));
+        // foreach(tzName; tzNames)
+        //    assertNotThrown!DateTimeException(testPZSuccess(tzName));
     }


@@ -28081,22 +28081,24 @@
         import std.range : retro;
         import std.format : format;

-        name = strip(name);
-
         enforce(tzDatabaseDir.exists(), new DateTimeException(format("Directory %s does not exist.", tzDatabaseDir)));
         enforce(tzDatabaseDir.isDir, new DateTimeException(format("%s is not a directory.", tzDatabaseDir)));

         version(Android)
         {
+            name = strip(name);
             auto tzfileOffset = name in tzdataIndex(tzDatabaseDir);
             enforce(tzfileOffset, new DateTimeException(format("The time zone %s is not listed.", name)));
             string tzFilename = separate_index ? "zoneinfo.dat" : "tzdata";
             immutable file = buildNormalizedPath(tzDatabaseDir, tzFilename);
         }
         else
-            immutable file = buildNormalizedPath(tzDatabaseDir, name);
+        {
+            auto filename = "./" ~ strip(name); // make sure the prefix is not stripped
+            immutable file = buildNormalizedPath(tzDatabaseDir, filename);
+        }

-        enforce(file.exists(), new DateTimeException(format("File %s does not exist.", file)));
+        enforce(file.exists(), new DateTimeException(format("File %s does not exist in %s.", file, tzDatabaseDir)));
         enforce(file.isFile, new DateTimeException(format("%s is not a file.", file)));

         auto tzFile = File(file);
@@ -28483,6 +28483,7 @@ assert(tz.dstName == "PDT");

         auto tzNames = getInstalledTZNames();

+        version(NoGuix)
         foreach(tzName; tzNames)
             assertNotThrown!DateTimeException(testPTZSuccess(tzName));

diff --git a/std/path.d b/std/path.d
index 254d8f0..b0fc04d 100644
--- a/std/path.d
+++ b/std/path.d
@@ -3080,8 +3080,11 @@ unittest
         }
         else
         {
+            pragma(msg, "test disabled on GNU Guix");
+/*
             assert(expandTilde("~root") == "/root", expandTilde("~root"));
             assert(expandTilde("~root/") == "/root/", expandTilde("~root/"));
+*/
         }
         assert(expandTilde("~Idontexist/hey") == "~Idontexist/hey");
     }
diff --git a/std/socket.d b/std/socket.d
index b85d1c9..7fbf346 100644
--- a/std/socket.d
+++ b/std/socket.d
@@ -859,6 +862,8 @@ class InternetHost

 unittest
 {
+    pragma(msg, "test disabled on GNU Guix");
+    /*
     InternetHost ih = new InternetHost;

     ih.getHostByAddr(0x7F_00_00_01);
@@ -889,6 +894,7 @@ unittest
         //      writefln("aliases[%d] = %s", i, s);
         // }
     });
+    */
 }


debug log:

solving 8a209f862 ...
found 8a209f862 in https://yhetil.org/guix/20180221012649.GA22636@thebird.nl/
found bdd6e5b76 in https://git.savannah.gnu.org/cgit/guix.git
preparing index
index prepared:
100644 bdd6e5b76cd27a3f531c7d6a9c723db7e1c3c264	gnu/packages/patches/ldc-disable-tests.patch

applying [1/1] https://yhetil.org/guix/20180221012649.GA22636@thebird.nl/
diff --git a/gnu/packages/patches/ldc-disable-tests.patch b/gnu/packages/patches/ldc-bootstrap-disable-tests.patch
similarity index 76%
rename from gnu/packages/patches/ldc-disable-tests.patch
rename to gnu/packages/patches/ldc-bootstrap-disable-tests.patch
index bdd6e5b76..8a209f862 100644

Checking patch gnu/packages/patches/ldc-disable-tests.patch => gnu/packages/patches/ldc-bootstrap-disable-tests.patch...
1:86: new blank line at EOF.
+
Applied patch gnu/packages/patches/ldc-disable-tests.patch => gnu/packages/patches/ldc-bootstrap-disable-tests.patch cleanly.
warning: 1 line adds whitespace errors.

index at:
100644 8a209f86252d4b7619222995c21d8faca5ce50ca	gnu/packages/patches/ldc-bootstrap-disable-tests.patch

(*) Git path names are given by the tree(s) the blob belongs to.
    Blobs themselves have no identifier aside from the hash of its contents.^

Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/guix.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.