- ghc-tickets - Haskell.org

[GHC] #9922: Partial type signatures + extensions panic
by GHC 19 Jan '15

19 Jan '15

#9922: Partial type signatures + extensions panic -------------------------------------+------------------------------------- Reporter: monoidal | Owner: Type: bug | Status: new Priority: normal | Milestone: Component: Compiler (Type | Version: 7.9 checker) | Operating System: Keywords: | Unknown/Multiple Architecture: Unknown/Multiple | Type of failure: Compile- Difficulty: Unknown | time crash Blocked By: | Test Case: Related Tickets: | Blocking: | Differential Revisions: -------------------------------------+------------------------------------- Partial type signatures combined with the following GHC extensions cause a panic: {{{#!hs class C a where default f :: _ -- DefaultSignatures instance Num Bool where negate :: _ -- InstanceSigs deriving instance _ -- StandaloneDeriving }}} -- Ticket URL: <http://ghc.haskell.org/trac/ghc/ticket/9922> GHC <http://www.haskell.org/ghc/> The Glasgow Haskell Compiler

1 8

[GHC] #8624: -ddump-splices-file
by GHC 19 Jan '15

19 Jan '15

#8624: -ddump-splices-file ------------------------------------+------------------------------------- Reporter: GregWeber | Owner: Type: feature request | Status: new Priority: normal | Milestone: Component: Compiler | Version: 7.6.3 Keywords: | Operating System: Unknown/Multiple Architecture: Unknown/Multiple | Type of failure: None/Unknown Difficulty: Unknown | Test Case: Blocked By: | Blocking: Related Tickets: | ------------------------------------+------------------------------------- I am proposing an additional feature, `-ddump-splices-file` that generates a corresponding `.hs.th` file for every `.hs` file that uses Template Haskell. `-ddump-splices` is an invaluable but a frustrating way to look at generated Haskell code. If TH generation were some kind of error message, the current output would make sense. However, TH is generating code that we rely on and would be easier to comprehend if we could see it in a way the most similar to our existing Haskell code. There is a valid complaint that when TH defines something you can't just grep for it, you have to know what TH is defining by reading documentation and imagining something that isn't in front of you. If you have a file `Foo.hs` `-ddump-splices-file` will generate `Foo.hs.th`. Then whenever someone greps after buliding they will find the declaration. If you check these files in they can grep even before building. Similarly, an IDE can show these files as the source of a declaration. Also, if the TH generation changes in some way when a TH function changes, that will be visible. This seems like a relatively easy feature to add. Any pointers on where to get started? -- Ticket URL: <http://ghc.haskell.org/trac/ghc/ticket/8624> GHC <http://www.haskell.org/ghc/> The Glasgow Haskell Compiler

1 26

[GHC] #9384: setNumCapabilities call breaks eventlog events
by GHC 19 Jan '15

19 Jan '15

#9384: setNumCapabilities call breaks eventlog events -------------------------------------+------------------------------------- Reporter: slyfox | Owner: Type: bug | Status: new Priority: normal | Milestone: Component: Profiling | Version: 7.8.3 Keywords: | Operating System: Linux Architecture: x86_64 (amd64) | Type of failure: Incorrect Difficulty: Unknown | result at runtime Blocked By: | Test Case: Related Tickets: | Blocking: | Differential Revisions: -------------------------------------+------------------------------------- The problem was found when i tried to eventlog '''ghc --make''' itself. I've missinterpreted is as a threadscope bug: https://github.com/haskell/ThreadScope/issues/37 Here is small program to reliably reproduce the bug: {{{#!hs module Main where import qualified Data.List as L import qualified System.Environment as E import Control.Monad import qualified Control.Concurrent as CC import qualified Control.Concurrent.MVar as CC slow_and_silly :: Int -> IO Int slow_and_silly i = return $ length $ L.foldl' (\a v -> a ++ [v]) [] [1..i] -- build as: -- $ ghc --make a -O2 -threaded -eventlog -- valid eventlog: -- $ ./a 2 7000 +RTS -ls -N2 -- $ ghc-events validate threads a.eventlog -- Valid eventlog: -- ... -- invalid eventlog -- $ ./a 2 7000 +RTS -ls -- $ ghc-events validate threads a.eventlog -- Invalid eventlog: -- ... main = do [caps, count] <- E.getArgs let n_caps :: Int n_caps = read caps max_n :: Int max_n = read count CC.setNumCapabilities n_caps waits <- replicateM n_caps $ CC.newEmptyMVar forM_ waits $ \w -> CC.forkIO $ do slow_and_silly max_n >>= print CC.putMVar w () forM_ waits $ \w -> CC.takeMVar w }}} How to reproduce (comments have '''ghc-events''' version): {{{ $ ghc --make a -O2 -threaded -eventlog $ ./a 2 7000 +RTS -ls -N2 $ threadscope a.eventlog # works $ ./a 2 7000 +RTS -ls $ threadscope a.eventlog # crashes }}} -- Ticket URL: <http://ghc.haskell.org/trac/ghc/ticket/9384> GHC <http://www.haskell.org/ghc/> The Glasgow Haskell Compiler

1 9

[GHC] #9889: Pattern synonym does not work at top level
by GHC 19 Jan '15

19 Jan '15

#9889: Pattern synonym does not work at top level -------------------------------------+------------------------------------- Reporter: goldfire | Owner: Type: bug | Status: new Priority: normal | Milestone: Component: Compiler | Version: 7.9 Keywords: PatternSynonyms | Operating System: Architecture: Unknown/Multiple | Unknown/Multiple Difficulty: Unknown | Type of failure: Blocked By: | None/Unknown Related Tickets: | Test Case: | Blocking: | Differential Revisions: -------------------------------------+------------------------------------- When I say {{{ pattern Id x = x Id x = True }}} I get {{{ Not in scope: data constructor ‘Id’ }}} This happens with both 7.8.3 and HEAD. -- Ticket URL: <http://ghc.haskell.org/trac/ghc/ticket/9889> GHC <http://www.haskell.org/ghc/> The Glasgow Haskell Compiler

1 6

[GHC] #10002: Invalid ghcversion.h file in GHC 7.10.1 RC1
by GHC 19 Jan '15

19 Jan '15

#10002: Invalid ghcversion.h file in GHC 7.10.1 RC1 -------------------------------------+------------------------------------- Reporter: asr | Owner: Type: bug | Status: new Priority: normal | Milestone: 7.10.1 Component: Compiler | Version: 7.10.1-rc1 Keywords: | Operating System: Unknown/Multiple Architecture: | Type of failure: None/Unknown Unknown/Multiple | Blocked By: Test Case: | Related Tickets: Blocking: | Differential Revisions: | -------------------------------------+------------------------------------- Using cpphs 1.18.7, I got the following error with GHC 7.10.1 RC1: {{{ $ cat Main.hs {-# LANGUAGE CPP #-} module Main where main :: IO () main = putStrLn "Hello, World!" }}} {{{ $ ghc -pgmP cpphs -optP --cpp Main.hs ... /usr/local/stow/ghc-7.10.1.RC1/lib/ghc-7.10.0.20141222/include/ghcversion.h:12:30: parse error on input ‘\\’ }}} By replacing {{{\\}}} by {{{\}}} in ghcversion.h, the issue is fixed. -- Ticket URL: <http://ghc.haskell.org/trac/ghc/ticket/10002> GHC <http://www.haskell.org/ghc/> The Glasgow Haskell Compiler

1 7

[GHC] #9992: Constructor specialization requires eta expansion
by GHC 19 Jan '15

19 Jan '15

#9992: Constructor specialization requires eta expansion -------------------------------------+------------------------------------- Reporter: bgamari | Owner: Type: bug | Status: new Priority: normal | Milestone: Component: Compiler | Version: 7.8.4 Keywords: | Operating System: Unknown/Multiple performance | Type of failure: Runtime Architecture: | performance bug Unknown/Multiple | Blocked By: Test Case: | Related Tickets: Blocking: | Differential Revisions: | -------------------------------------+------------------------------------- I recently encountered a slightly tricky performance issue[1] in `bytestring`'s `Builder` implementation which required explicit eta expansion in order for GHC to perform ConstrSpec. We have {{{#!hs data BufferRange = BufferRange {-# UNPACK #-} !(Ptr Word8) -- First byte of range {-# UNPACK #-} !(Ptr Word8) -- First byte /after/ range data BuildSignal a = ... -- Just a vanilla ADT type BuildStep a = BufferRange -> IO (BuildSignal a) }}} We end up with Core (full version https://gist.github.com/bgamari/091e3dac9c45ee9accf1#file-slow-hs-L1) that looks like this, {{{#!hs Main.$wa :: GHC.Prim.Word# -> GHC.Prim.Int# -> forall r_aKUt. Data.ByteString.Builder.Internal.BuildStep r_aKUt -> Data.ByteString.Builder.Internal.BuildStep r_aKUt Main.$wa = \ (ww_s10YU :: GHC.Prim.Word#) (ww1_s10YY :: GHC.Prim.Int#) (@ r_aKUt) (w_s10YR :: Data.ByteString.Builder.Internal.BuildStep r_aKUt) -> case ww1_s10YY of wild_XE { __DEFAULT -> ( \ (eta1_X1Q :: Data.ByteString.Builder.Internal.BufferRange) -> case eta1_X1Q of BufferRange a b -> -- A bunch of code eventually ending in a recursive call to $wa ) 0 -> w_s10YR } }}} If `w_s10YR` is eta-expanded GHC will run ConstrSpec, eliminating the fields of `BufferRange` to be unpacked between iterations of `$wa` and substantially improving performance. In [1] we had to manually eta-expand the empty case to ensure that this would happen. It would be great if GHC would identify cases like this. [1] https://github.com/haskell/bytestring/pull/40 -- Ticket URL: <http://ghc.haskell.org/trac/ghc/ticket/9992> GHC <http://www.haskell.org/ghc/> The Glasgow Haskell Compiler

1 3

Re: [GHC] #7870: Compilation errors break the complexity encapsulation on DSLs, impairs success in industry
by GHC 18 Jan '15

18 Jan '15

#7870: Compilation errors break the complexity encapsulation on DSLs, impairs success in industry -------------------------------------+------------------------------------- Reporter: agocorona | Owner: Type: feature request | Status: new Priority: normal | Milestone: Component: Compiler (Type | Version: 7.7 checker) | Keywords: DSL, Resolution: | Error, Operating System: Unknown/Multiple | Architecture: Type of failure: None/Unknown | Unknown/Multiple Blocked By: | Test Case: Related Tickets: | Blocking: | Differential Revisions: -------------------------------------+------------------------------------- Changes (by snoyberg): * cc: snoyberg (added) -- Ticket URL: <http://ghc.haskell.org/trac/ghc/ticket/7870#comment:7> GHC <http://www.haskell.org/ghc/> The Glasgow Haskell Compiler

1 0

[GHC] #10000: Derived DataKinds Typeable instance collision leads to SafeHaskell violation
by GHC 17 Jan '15

17 Jan '15

#10000: Derived DataKinds Typeable instance collision leads to SafeHaskell violation -------------------------------------+------------------------------------- Reporter: shachaf | Owner: Type: bug | Status: new Priority: normal | Milestone: Component: Compiler | Version: 7.8.4 Keywords: | Operating System: Unknown/Multiple Architecture: | Type of failure: None/Unknown Unknown/Multiple | Blocked By: Test Case: | Related Tickets: Blocking: | Differential Revisions: | -------------------------------------+------------------------------------- The derived `Typeable` instances for a kind (with `DataKinds`) is equal to the instance of a type with the same name: {{{ λ> data T = T λ> typeRep (Proxy :: Proxy T) == typeRep (Proxy :: Proxy 'T) True }}} This can be used to violate `SafeHaskell` easily: {{{#!hs {-# LANGUAGE AutoDeriveTypeable, DataKinds, TypeFamilies, RankNTypes #-} module Unsafe where import Data.Typeable data T = T data family F p newtype instance F (Proxy T) = ID (forall a. a -> a) newtype instance F (Proxy 'T) = UC (forall a b. a -> b) uc :: a -> b uc = case cast (ID id) of Just (UC f) -> f }}} {{{ $ ghc -XSafe Unsafe.hs -e "uc 'a' :: Int" 97 }}} -- Ticket URL: <http://ghc.haskell.org/trac/ghc/ticket/10000> GHC <http://www.haskell.org/ghc/> The Glasgow Haskell Compiler

1 4

[GHC] #9971: GHC 7.10 dies with "out of memory"
by GHC 17 Jan '15

17 Jan '15

#9971: GHC 7.10 dies with "out of memory" -------------------------------------+------------------------------------- Reporter: albertov | Owner: Type: bug | Status: new Priority: normal | Milestone: Component: Compiler | Version: 7.10.1-rc1 Keywords: | Operating System: Linux Architecture: x86_64 | Type of failure: Compile-time (amd64) | crash Test Case: | Blocked By: Blocking: | Related Tickets: Differential Revisions: | -------------------------------------+------------------------------------- I'm trying to build my [https://github.com/meteogrid/sigym4-geometry library] with `cabal 1.22` and `ghc-7.10.0.20141222` but it ultimately crashes with `ghc: out of memory (requested 2097152 bytes)`. The VM I've used to build it has 8gb of RAM. The same library compiles fine with `ghc 7.8.3` so I guess it is a GHC bug. Unfortunately I'm not able to reduce it to a simple case or relate it to a previous bug. The build log can be seen at [https://travis- ci.org/meteogrid/sigym4-geometry/builds/46370766 travis-ci] and the source code is freely available so it should be easy to reproduce -- Ticket URL: <http://ghc.haskell.org/trac/ghc/ticket/9971> GHC <http://www.haskell.org/ghc/> The Glasgow Haskell Compiler

1 16

[GHC] #9998: GHC binary package seems to be corrupt
by GHC 16 Jan '15

16 Jan '15

#9998: GHC binary package seems to be corrupt -------------------------------------+------------------------------------- Reporter: | Owner: mark_christiaens | Status: new Type: bug | Milestone: Priority: normal | Version: 7.8.4 Component: Package | Operating System: Linux system | Type of failure: Installing GHC Keywords: | failed Architecture: x86_64 | Blocked By: (amd64) | Related Tickets: Test Case: | Blocking: | Differential Revisions: | -------------------------------------+------------------------------------- Installed https://www.haskell.org/ghc/dist/7.8.4/ghc-7.8.4-x86_64-unknown- linux-deb7.tar.bz2 Did ghc-pkg check Got: ghc-pkg check There are problems in package haskell-src-exts-1.16.0.1: Warning: library-dirs: /home/developer/.cabal/lib/x86_64-linux-ghc-7.8.4 /haskell-src-exts-1.16.0.1 doesn't exist or isn't a directory Warning: haddock-interfaces: /home/developer/.cabal/share/doc/x86_64 -linux-ghc-7.8.4/haskell-src-exts-1.16.0.1/html/haskell-src-exts.haddock doesn't exist or isn't a file Warning: haddock-html: /home/developer/.cabal/share/doc/x86_64-linux- ghc-7.8.4/haskell-src-exts-1.16.0.1/html doesn't exist or isn't a directory import-dirs: /home/developer/.cabal/lib/x86_64-linux-ghc-7.8.4/haskell- src-exts-1.16.0.1 doesn't exist or isn't a directory cannot find any of ["Language/Haskell/Exts.hi","Language/Haskell/Exts.p_hi","Language/Haskell/Exts.dyn_hi"] cannot find any of ["Language/Haskell/Exts/Lexer.hi","Language/Haskell/Exts/Lexer.p_hi","Language/Haskell/Exts/Lexer.dyn_hi"] cannot find any of ["Language/Haskell/Exts/Parser.hi","Language/Haskell/Exts/Parser.p_hi","Language/Haskell/Exts/Parser.dyn_hi"] cannot find any of ["Language/Haskell/Exts/Pretty.hi","Language/Haskell/Exts/Pretty.p_hi","Language/Haskell/Exts/Pretty.dyn_hi"] cannot find any of ["Language/Haskell/Exts/Syntax.hi","Language/Haskell/Exts/Syntax.p_hi","Language/Haskell/Exts/Syntax.dyn_hi"] cannot find any of ["Language/Haskell/Exts/Extension.hi","Language/Haskell/Exts/Extension.p_hi","Language/Haskell/Exts/Extension.dyn_hi"] cannot find any of ["Language/Haskell/Exts/Build.hi","Language/Haskell/Exts/Build.p_hi","Language/Haskell/Exts/Build.dyn_hi"] cannot find any of ["Language/Haskell/Exts/Fixity.hi","Language/Haskell/Exts/Fixity.p_hi","Language/Haskell/Exts/Fixity.dyn_hi"] cannot find any of ["Language/Haskell/Exts/Comments.hi","Language/Haskell/Exts/Comments.p_hi","Language/Haskell/Exts/Comments.dyn_hi"] cannot find any of ["Language/Haskell/Exts/SrcLoc.hi","Language/Haskell/Exts/SrcLoc.p_hi","Language/Haskell/Exts/SrcLoc.dyn_hi"] cannot find any of ["Language/Haskell/Exts/Annotated.hi","Language/Haskell/Exts/Annotated.p_hi","Language/Haskell/Exts/Annotated.dyn_hi"] cannot find any of ["Language/Haskell/Exts/Annotated/Syntax.hi","Language/Haskell/Exts/Annotated/Syntax.p_hi","Language/Haskell/Exts/Annotated/Syntax.dyn_hi"] cannot find any of ["Language/Haskell/Exts/Annotated/Fixity.hi","Language/Haskell/Exts/Annotated/Fixity.p_hi","Language/Haskell/Exts/Annotated/Fixity.dyn_hi"] cannot find any of ["Language/Haskell/Exts/Annotated/Build.hi","Language/Haskell/Exts/Annotated/Build.p_hi","Language/Haskell/Exts/Annotated/Build.dyn_hi"] cannot find any of ["Language/Haskell/Exts/Annotated/ExactPrint.hi","Language/Haskell/Exts/Annotated/ExactPrint.p_hi","Language/Haskell/Exts/Annotated/ExactPrint.dyn_hi"] cannot find any of ["Language/Haskell/Exts/Annotated/Simplify.hi","Language/Haskell/Exts/Annotated/Simplify.p_hi","Language/Haskell/Exts/Annotated/Simplify.dyn_hi"] cannot find any of ["Language/Haskell/Exts/ExtScheme.hi","Language/Haskell/Exts/ExtScheme.p_hi","Language/Haskell/Exts/ExtScheme.dyn_hi"] cannot find any of ["Language/Haskell/Exts/ParseMonad.hi","Language/Haskell/Exts/ParseMonad.p_hi","Language/Haskell/Exts/ParseMonad.dyn_hi"] cannot find any of ["Language/Haskell/Exts/ParseSyntax.hi","Language/Haskell/Exts/ParseSyntax.p_hi","Language/Haskell/Exts/ParseSyntax.dyn_hi"] cannot find any of ["Language/Haskell/Exts/InternalLexer.hi","Language/Haskell/Exts/InternalLexer.p_hi","Language/Haskell/Exts/InternalLexer.dyn_hi"] cannot find any of ["Language/Haskell/Exts/ParseUtils.hi","Language/Haskell/Exts/ParseUtils.p_hi","Language/Haskell/Exts/ParseUtils.dyn_hi"] cannot find any of ["Language/Haskell/Exts/InternalParser.hi","Language/Haskell/Exts/InternalParser.p_hi","Language/Haskell/Exts/InternalParser.dyn_hi"] cannot find any of ["libHShaskell-src-exts-1.16.0.1.a","libHShaskell- src-exts-1.16.0.1.p_a","libHShaskell-src-exts-1.16.0.1-ghc7.8.4.so ","libHShaskell-src-exts-1.16.0.1-ghc7.8.4.dylib","HShaskell-src- exts-1.16.0.1-ghc7.8.4.dll"] on library path There are problems in package aeson-0.8.0.2: Warning: library-dirs: /home/developer/.cabal/lib/x86_64-linux- ghc-7.8.4/aeson-0.8.0.2 doesn't exist or isn't a directory ... -- Ticket URL: <http://ghc.haskell.org/trac/ghc/ticket/9998> GHC <http://www.haskell.org/ghc/> The Glasgow Haskell Compiler

1 1