ghc: 9.6.6-debian-binary for powerpc64le, too

Build on NixOS#439258 to bootstrap GHC on
powerpc64le in the same way: using the Debian package.

Move the conditionals in top-level/haskell-packages.nix to probe for support
from the 9.6.6-debian-binary.nix package so it's easier to do the same thing for
other architectures, too, should anyone else need it.

Author: nwf

pkgs/development/compilers/ghc/9.6.6-debian-binary.nix

@@ -23,6 +23,33 @@ let
   # GHC upstream doesn't release bindist tarballs for some platforms.
   # We're using Debian's binary package, and patching it into a usable-in-Nixpkgs state.
   ghcDebs = {
+    powerpc64le-linux = {
+      src = {
+        urls = [
+          "http://ftp.debian.org/debian/pool/main/g/ghc/ghc_9.6.6-4_ppc64el.deb"
+        ];
+        sha256 = "6dd14937485831c72aef62851c4251f2afa2c7a06a2d4956e25a1f82ab195a01";
+      };
+      exePathForLibraryCheck = null;
+      archSpecificLibraries = [
+        {
+          nixPackage = gmp;
+          fileToCheckFor = null;
+        }
+        {
+          nixPackage = ncurses6;
+          fileToCheckFor = "libtinfo.so.6";
+        }
+        {
+          nixPackage = numactl;
+          fileToCheckFor = null;
+        }
+        {
+          nixPackage = libffi;
+          fileToCheckFor = null;
+        }
+      ];
+    };
     powerpc64-linux = {
       src = {
         urls = [
@@ -50,6 +77,8 @@ let
           fileToCheckFor = null;
         }
       ];
+
+      platforms = lib.systems.inspect.patterns.isAbiElfv1;
     };
   };
 
@@ -191,11 +220,11 @@ stdenv.mkDerivation (finalAttrs: {
     # Patch ghc settings
     + ''
       substituteInPlace $out/lib/ghc/lib/settings \
-        --replace-fail powerpc64-linux-gnu-gcc gcc \
-        --replace-fail powerpc64-linux-gnu-g++ g++ \
-        --replace-fail powerpc64-linux-gnu-ld ld \
-        --replace-fail powerpc64-linux-gnu-ar ar \
-        --replace-fail powerpc64-linux-gnu-ranlib ranlib \
+        --replace-fail ${stdenv.hostPlatform.system}-gnu-gcc gcc \
+        --replace-fail ${stdenv.hostPlatform.system}-gnu-g++ g++ \
+        --replace-fail ${stdenv.hostPlatform.system}-gnu-ld ld \
+        --replace-fail ${stdenv.hostPlatform.system}-gnu-ar ar \
+        --replace-fail ${stdenv.hostPlatform.system}-gnu-ranlib ranlib \
         --replace-fail llc-18 llc \
         --replace-fail opt-18 opt
     '';
@@ -262,7 +291,26 @@ stdenv.mkDerivation (finalAttrs: {
     homepage = "http://haskell.org/ghc";
     description = "Glasgow Haskell Compiler";
     license = lib.licenses.bsd3;
-    platforms = builtins.attrNames ghcDebs;
+
+    # ghcDebs is keyed on the system double (cpu-kernel), and each entry may
+    # additionally constrain the choice of platforms with a system inspection
+    # pattern.
+    platforms = builtins.map (
+      system:
+      let
+        isThis = lib.attrsets.filterAttrs (
+          n: v:
+          builtins.elem n [
+            "cpu"
+            "kernel"
+          ]
+        ) (lib.systems.parse.mkSystemFromString system);
+      in
+      if ghcDebs.${system} ? platforms then
+        lib.systems.inspect.patternLogicalAnd isThis ghcDebs.${system}.platforms
+      else
+        isThis
+    ) (builtins.attrNames ghcDebs);
     maintainers = [ lib.maintainers.OPNA2608 ];
     teams = [ lib.teams.haskell ];
   };

pkgs/top-level/haskell-packages.nix

@@ -6,6 +6,7 @@
   newScope,
   stdenv,
   config,
+  lib,
 }:
 
 let
@@ -89,6 +90,14 @@ in
   compiler = pkgs.lib.recurseIntoAttrs (
     let
       bb = pkgsBuildBuild.haskell;
+
+      # No bindist, "borrowing" the GHC from Debian
+      useDebianBinaryOr =
+        pkg:
+        if lib.meta.availableOn stdenv.hostPlatform bb.packages.ghc966DebianBinary.ghc then
+          bb.packages.ghc966DebianBinary
+        else
+          pkg;
     in
     {
       # Required to bootstrap 9.4.8.
@@ -110,67 +119,31 @@ in
         inherit buildTargetLlvmPackages llvmPackages;
       };
       ghc967 = callPackage ../development/compilers/ghc/9.6.7.nix {
-        bootPkgs =
-          if
-            stdenv.buildPlatform.isPower64
-            && stdenv.buildPlatform.isBigEndian
-            && pkgs.stdenv.hostPlatform.isAbiElfv1
-          then
-            # No bindist, "borrowing" the GHC from Debian
-            bb.packages.ghc966DebianBinary
-          else
-            bb.packages.ghc948;
+        bootPkgs = useDebianBinaryOr bb.packages.ghc948;
         inherit (buildPackages.python3Packages) sphinx;
         inherit (buildPackages.darwin) xattr autoSignDarwinBinariesHook;
         inherit buildTargetLlvmPackages llvmPackages;
       };
       ghc984 = callPackage ../development/compilers/ghc/9.8.4.nix {
-        bootPkgs =
-          if
-            stdenv.buildPlatform.isPower64
-            && stdenv.buildPlatform.isBigEndian
-            && pkgs.stdenv.hostPlatform.isAbiElfv1
-          then
-            # No bindist, "borrowing" the GHC from Debian
-            bb.packages.ghc966DebianBinary
-          else if stdenv.buildPlatform.isi686 then
-            bb.packages.ghc948
-          else
-            bb.packages.ghc984Binary;
+        bootPkgs = useDebianBinaryOr (
+          if stdenv.buildPlatform.isi686 then bb.packages.ghc948 else bb.packages.ghc984Binary
+        );
         inherit (buildPackages.python3Packages) sphinx;
         inherit (buildPackages.darwin) xattr autoSignDarwinBinariesHook;
         inherit buildTargetLlvmPackages llvmPackages;
       };
       ghc9102 = callPackage ../development/compilers/ghc/9.10.2.nix {
-        bootPkgs =
-          if
-            stdenv.buildPlatform.isPower64
-            && stdenv.buildPlatform.isBigEndian
-            && pkgs.stdenv.hostPlatform.isAbiElfv1
-          then
-            # No bindist, "borrowing" the GHC from Debian
-            bb.packages.ghc966DebianBinary
-          else if stdenv.buildPlatform.isi686 then
-            bb.packages.ghc967
-          else
-            bb.packages.ghc984Binary;
+        bootPkgs = useDebianBinaryOr (
+          if stdenv.buildPlatform.isi686 then bb.packages.ghc967 else bb.packages.ghc984Binary
+        );
         inherit (buildPackages.python3Packages) sphinx;
         inherit (buildPackages.darwin) xattr autoSignDarwinBinariesHook;
         inherit buildTargetLlvmPackages llvmPackages;
       };
       ghc9103 = callPackage ../development/compilers/ghc/9.10.3.nix {
-        bootPkgs =
-          if
-            stdenv.buildPlatform.isPower64
-            && stdenv.buildPlatform.isBigEndian
-            && pkgs.stdenv.hostPlatform.isAbiElfv1
-          then
-            # No bindist, "borrowing" the GHC from Debian
-            bb.packages.ghc966DebianBinary
-          else if stdenv.buildPlatform.isi686 then
-            bb.packages.ghc967
-          else
-            bb.packages.ghc984Binary;
+        bootPkgs = useDebianBinaryOr (
+          if stdenv.buildPlatform.isi686 then bb.packages.ghc967 else bb.packages.ghc984Binary
+        );
         inherit (buildPackages.python3Packages) sphinx;
         inherit (buildPackages.darwin) xattr autoSignDarwinBinariesHook;
         inherit buildTargetLlvmPackages llvmPackages;