[GHC] #15914: haddock-library-1.7.0 fails to build on ppc64 BE

[GHC]

#15914: haddock-library-1.7.0 fails to build on ppc64 BE
-------------------------------------+-------------------------------------
           Reporter:  juhpetersen    |             Owner:  (none)
               Type:  bug            |            Status:  new
           Priority:  normal         |         Milestone:  8.6.3
          Component:  Compiler       |           Version:  8.6.2
           Keywords:                 |  Operating System:  Linux
       Architecture:  powerpc64      |   Type of failure:  Compile-time
                                     |  crash or panic
          Test Case:                 |        Blocked By:
           Blocking:                 |   Related Tickets:
Differential Rev(s):                 |         Wiki Page:
-------------------------------------+-------------------------------------
 I was trying to build ghc-8.6.2 for Fedora 28 and it failed on ppc64
 (Bigendian) with:

 {{{
 utils/haddock/haddock-library/src/Documentation/Haddock/Types.hs:99:25:
 error:
     • GHC internal error: ‘TableRow’ is not in scope during type checking,
 but it passed the renamer
       tcl_env of environment: [aIy :-> Type variable ‘id’ = id :: k,
                                rHO :-> ATcTyCon Table :: k -> *,
                                rHP :-> APromotionErr RecDataConPE]
     • In the type ‘[TableRow id]’
       In the definition of data constructor ‘Table’
       In the data declaration for ‘Table’
    |
 99 |   { tableHeaderRows :: [TableRow id]
    |                         ^^^^^^^^
 utils/haddock/dist/build/haddock/autogen/Paths_haddock.hs:41:22: error:
     • Couldn't match type ‘a’ with ‘String’
       Expected type: IO a
         Actual type: IO String
     • In the first argument of ‘catchIO’, namely
         ‘(getEnv "haddock_libdir")’
       In the expression:
         catchIO (getEnv "haddock_libdir") (\ _ -> return libdir)
       In an equation for ‘getLibDir’:
           getLibDir
             = catchIO (getEnv "haddock_libdir") (\ _ -> return libdir)
    |
 41 | getLibDir = catchIO (getEnv "haddock_libdir") (\_ -> return libdir)
    |                      ^^^^^^^^^^^^^^^^^^^^^^^
 make[1]: *** [utils/haddock/ghc.mk:20:
 utils/haddock/dist/build/Documentation/Haddock/Types.dyn_o] Error 1
 make[1]: *** Waiting for unfinished jobs....
 make[1]: *** [utils/haddock/ghc.mk:20:
 utils/haddock/dist/build/Paths_haddock.dyn_o] Error 1
 utils/haddock/haddock-api/src/Haddock/Syb.hs:22:1: warning: [-Wunused-top-
 binds]
     Defined but not used: ‘isType’
    |
 22 | isType _ = isJust $ eqT @a @b
    | ^^^^^^
 utils/haddock/haddock-api/src/Haddock/Syb.hs:38:1: warning: [-Wunused-top-
 binds]
     Defined but not used: ‘everythingBut’
    |
 38 | everythingBut k f x = let (v, stop) = f x
    | ^^^^^^^^^^^^^
 utils/haddock/haddock-api/src/Haddock/Syb.hs:60:21: warning: [-Wunused-
 matches]
     Defined but not used: ‘s’
    |
 60 | everythingWithState s k f x =
    |                     ^
 utils/haddock/haddock-api/src/Haddock/Syb.hs:75:1: warning: [-Wunused-top-
 binds]
     Defined but not used: ‘everywhereBut’
    |
 75 | everywhereBut q f x
    | ^^^^^^^^^^^^^
 ghc-stage2: panic! (the 'impossible' happened)
   (GHC version 8.6.2 for powerpc64-unknown-linux):
         urk! lookup local fingerprint
   $fShowTokenType
   []
   Call stack:
       CallStack (from HasCallStack):
         callStackDoc, called at compiler/utils/Outputable.hs:1160:37 in
 ghc:Outputable
         pprPanic, called at compiler/iface/MkIface.hs:524:37 in
 ghc:MkIface
 Please report this as a GHC bug:  http://www.haskell.org/ghc/reportabug
 make[1]: *** [utils/haddock/ghc.mk:20:
 utils/haddock/dist/build/Haddock/Backends/Hyperlinker/Types.dyn_o] Error 1
 make: *** [Makefile:127: all] Error 2
 }}}

 https://koji.fedoraproject.org/koji/taskinfo?taskID=30919315 (the log
 files are only preserved for 2 weeks)

-- 
Ticket URL: <http://ghc.haskell.org/trac/ghc/ticket/15914>
GHC <http://www.haskell.org/ghc/>
The Glasgow Haskell Compiler