Bug#1084122: haskell-unixutils: FTBFS: Couldn't match expected type

[Sebastian Ramacher]

Source: haskell-unixutils
Version: 1.54.2-2
Severity: serious
Tags: ftbfs
Justification: fails to build from source (but built successfully in the past)
X-Debbugs-Cc: sramacher at debian.org

https://buildd.debian.org/status/fetch.php?pkg=haskell-unixutils&arch=amd64&ver=1.54.2-2%2Bb3&stamp=1727371727&raw=0

Preprocessing library for Unixutils-1.54.2..
Building library for Unixutils-1.54.2..
[1 of 9] Compiling System.Unix.Chroot ( System/Unix/Chroot.hs, dist-ghc/build/System/Unix/Chroot.o, dist-ghc/build/System/Unix/Chroot.dyn_o )

System/Unix/Chroot.hs:48:27: error: [GHC-83865]
    • Couldn't match expected type: OpenFileFlags
                                    -> IO System.Posix.Types.Fd
                  with actual type: IO System.Posix.Types.Fd
    • The function ‘openFd’ is applied to four value arguments,
        but its type ‘FilePath
                      -> OpenMode -> OpenFileFlags -> IO System.Posix.Types.Fd’
        has only three
      In the second argument of ‘($)’, namely
        ‘openFd "/" ReadOnly Nothing defaultFileFlags’
      In a stmt of a 'do' block:
        rootFd <- liftIO $ openFd "/" ReadOnly Nothing defaultFileFlags
   |
48 |        rootFd <- liftIO $ openFd "/" ReadOnly Nothing defaultFileFlags
   |                           ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

System/Unix/Chroot.hs:48:47: error: [GHC-83865]
    • Couldn't match expected type ‘OpenFileFlags’
                  with actual type ‘Maybe a0’
    • In the third argument of ‘openFd’, namely ‘Nothing’
      In the second argument of ‘($)’, namely
        ‘openFd "/" ReadOnly Nothing defaultFileFlags’
      In a stmt of a 'do' block:
        rootFd <- liftIO $ openFd "/" ReadOnly Nothing defaultFileFlags
   |
48 |        rootFd <- liftIO $ openFd "/" ReadOnly Nothing defaultFileFlags
   |                                               ^^^^^^^


Cheers
-- 
Sebastian Ramacher