diff --git a/flake.lock b/flake.lock
index 237f0fd..f6d2042 100644
--- a/flake.lock
+++ b/flake.lock
@@ -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": {
diff --git a/flake.nix b/flake.nix
index 8411fb3..1e80f20 100644
--- a/flake.nix
+++ b/flake.nix
@@ -11,7 +11,7 @@
 
   outputs = { nixpkgs, utils, ... }:
     let
-      compiler = "ghc92";
+      compiler = "ghc94";
 
       overlay = final: prev: {
         cabal2nix-unwrapped =
diff --git a/src/Nix.hsc b/src/Nix.hsc
index 54e436a..f336617 100644
--- a/src/Nix.hsc
+++ b/src/Nix.hsc
@@ -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)