Support GHC 9.4 (#32)

Fixes https://github.com/aristanetworks/nix-serve-ng/issues/31
This commit is contained in:
Gabriella Gonzalez 2023-12-18 07:16:55 -08:00 committed by GitHub
parent f3931b8120
commit 21e65cb4c6
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
3 changed files with 6 additions and 5 deletions

View File

@ -18,11 +18,11 @@
},
"nixpkgs": {
"locked": {
"lastModified": 1688403656,
"narHash": "sha256-zmNai3dKWUCKpKubPWsEJ1Q7od96KebWVDJNCnk+fr0=",
"lastModified": 1700856099,
"narHash": "sha256-RnEA7iJ36Ay9jI0WwP+/y4zjEhmeN6Cjs9VOFBH7eVQ=",
"owner": "NixOS",
"repo": "nixpkgs",
"rev": "453da3c28f7a95374b73d1f3fd665dd40e6049e9",
"rev": "0bd59c54ef06bc34eca01e37d689f5e46b3fe2f1",
"type": "github"
},
"original": {

View File

@ -11,7 +11,7 @@
outputs = { nixpkgs, utils, ... }:
let
compiler = "ghc92";
compiler = "ghc94";
overlay = final: prev: {
cabal2nix-unwrapped =

View File

@ -162,8 +162,9 @@ data PathInfo = PathInfo
fromCPathInfo :: CPathInfo -> IO PathInfo
fromCPathInfo CPathInfo{ deriver, narHash, narSize, references, sigs } = do
let String_{ data_ } = deriver
deriver_ <-
if data_ (deriver :: String_) == Foreign.nullPtr
if data_ == Foreign.nullPtr
then return Nothing
else fmap Just (fromString_ deriver)