2 years agoAttach warnings to non-PVP compatible uses of signatures.
Edward Z. Yang [Fri, 30 Dec 2016 02:58:22 +0000 (18:58 -0800)] 
Attach warnings to non-PVP compatible uses of signatures.

If you use an inherited signature from another package in your own code,
the only valid PVP bound you can specify for this package is an *exact*
version bound.  This is because the signature is used both covariantly
(it provides declarations for import) and contravariantly (it specifies
what is required).  However, this is a bit distressing if you want to
use a PVP-style bound that allows for upgrading a package.  So there is
a dichotomy:

    1. Any signatures that come from packages with exact bounds
    (this includes, in particular, signature packages, who are
    included solely to make declarations available), can be
    used without problem by modules, but

    2. Any signatures that come from packages that are version
    bounded (i.e., any package that also provides modules) must
    NOT be used, because if they were used, they could break
    under a PVP policy that allows relaxations in the needed

To help users avoid situation (2), I've added a warning to all
signature declarations that come solely from (2).  This is not
perfect; you might still end up relying on some type identity
specified by a signature in a version-bounded package, but it
should help catch major errors.

Signed-off-by: Edward Z. Yang <>
Test Plan: validate

Reviewers: simonpj, austin, bgamari

Subscribers: thomie

Differential Revision:

2 years agoSupport for using only partial pieces of included signatures.
Edward Z. Yang [Tue, 27 Dec 2016 02:39:01 +0000 (18:39 -0800)] 
Support for using only partial pieces of included signatures.

Generally speaking, it's not possible to "hide" a requirement from a
package you include, because if there is some module relying on that
requirement, well, you can't just wish it out of existence.

However, some packages don't have any modules.  For these, we can
validly thin out requirements; indeed, this is very convenient if
someone has published a large signature package but you only want
some of the definitions.

This patchset tweaks the interpretation of export lists in
signatures: in particular, they no longer need to refer to
entities that are defined locally; they range over both the current
signature as well as any signatures that were inherited from
signature packages (defined by having zero exposed modules.)

In the process of doing this, I cleaned up a number of other

* rnModIface and rnModExports now report errors that occurred
  during renaming and can propagate these to the TcM monad.
  This is important because in the current semantics, you can
  thin out a type which is referenced by a value you keep;
  in this situation, we need to error (to ensure that all
  types in signatures are rooted, so that we can determine
  their identities).

* I ended up introducing a new construct 'dependency signature;
  to bkp files, to make it easier to tell if we were depending
  on a signature package.  It's not difficult for Cabal to
  figure this out (I already have a patch for it.)

Signed-off-by: Edward Z. Yang <>
Test Plan: validate

Reviewers: simonpj, austin, bgamari

Subscribers: thomie, mpickering

Differential Revision:

GHC Trac Issues: #12994

2 years agoRevert "event manager: Don't worry if attempt to wake dead manager fails"
Ben Gamari [Wed, 11 Jan 2017 04:40:33 +0000 (23:40 -0500)] 
Revert "event manager: Don't worry if attempt to wake dead manager fails"

This broke the OS X build.

This reverts commit 6de7613604216f65fae92d8066a078bf9cd3c088.

2 years agoInline partially-applied wrappers
David Feuer [Tue, 10 Jan 2017 21:33:20 +0000 (16:33 -0500)] 
Inline partially-applied wrappers

Suppose we have

data Node a = Node2 !Int a a | Node3 !Int a a a
instance Traversable Node where
  traverse f (Node2 s x y) = Node2 s <$> f x <*> f y


Since `Node2` is partially applied, we wouldn't inline its
wrapper.  The result was that we'd box up the `Int#` to put
the box in the closure passed to `fmap`. We now allow the wrapper
to inline when partially applied, so GHC stores the `Int#`
directly in the closure.

Reviewers: rwbarton, mpickering, simonpj, austin, bgamari

Reviewed By: simonpj, bgamari

Subscribers: mpickering, thomie

Differential Revision:

GHC Trac Issues: #12990

2 years agoFix references in let/app invariant note
David Feuer [Tue, 10 Jan 2017 20:45:40 +0000 (15:45 -0500)] 
Fix references in let/app invariant note

`mkCoreApp` and `mkCoreLet` have moved since the let/app invariant
note was written. Update the note to reflect that change.

[skip ci]

Test Plan: Read

Reviewers: austin, bgamari

Reviewed By: bgamari

Subscribers: thomie

Differential Revision:

2 years agoMark *FB functions INLINE[0] (Fixes #13001)
Takano Akio [Tue, 10 Jan 2017 19:36:00 +0000 (14:36 -0500)] 
Mark *FB functions INLINE[0] (Fixes #13001)

When fusion rules successfully fire, we are left with calls to
*FB functions. They are higher-order functions, and therefore they
often benefit from inlining. This is particularly important when
then final consumer is a strict fold (foldl', length, etc.), because
not inlining these functions means allocating a function closure
for each element in the list, which often is more costly than what
fusion eliminates.

Nofib shows a slight increase in the binary size:

       Program           Size    Allocs   Runtime   Elapsed  TotalMem
   gen_regexps          -0.3%      0.0%     0.000     0.000      0.0%
        puzzle          +0.8%      0.0%     0.089     0.090      0.0%
       reptile          +0.8%     -0.0%     0.008     0.008      0.0%
           Min          -0.3%     -0.0%     -7.3%     -7.1%      0.0%
           Max          +0.8%     +0.0%     +7.8%     +7.7%     +1.8%
Geometric Mean          +0.0%     -0.0%     +0.2%     +0.2%     +0.0%

Reviewers: simonpj, austin, hvr, bgamari

Reviewed By: simonpj

Subscribers: simonpj, thomie

Differential Revision:

GHC Trac Issues: #13001

2 years agoDon't use the splitter on Darwin
Demi Obenour [Tue, 10 Jan 2017 19:32:46 +0000 (14:32 -0500)] 
Don't use the splitter on Darwin

Test Plan: GHC CI

Reviewers: austin, bgamari

Reviewed By: bgamari

Subscribers: thomie

Differential Revision:

2 years agoFix terminal corruption bug and clean up SDoc interface.
Phil Ruffwind [Tue, 10 Jan 2017 19:31:55 +0000 (14:31 -0500)] 
Fix terminal corruption bug and clean up SDoc interface.

- Fix #13076 by wrapping `printDoc_` so that the terminal color is
  reset even if an exception occurs.

- Add `printSDoc`, `printSDocLn`, and `bufLeftRenderSDoc` to keep `SDoc`
  values abstract (they are wrappers of `printDoc_`, `printDoc`, and
  `bufLeftRender` respectively).

- Remove unused function: `printForAsm`

Test Plan: manual

Reviewers: RyanGlScott, austin, dfeuer, bgamari

Reviewed By: dfeuer, bgamari

Subscribers: dfeuer, mpickering, thomie

Differential Revision:

GHC Trac Issues: #13076

2 years agotestsuite driver: don't append to existing output files
Reid Barton [Tue, 10 Jan 2017 19:29:11 +0000 (14:29 -0500)] 
testsuite driver: don't append to existing output files

If you happen to have a file lying aroud (probably
from before the move to running tests in temporary subdirectories)
it gets symlinked into the directory since its name starts
with T1234; and then program output gets appended to the existing
file (through the symlink). We should open the file for writing
instead, to replace the symlink with a new file.

Test Plan: tested locally, + harbormaster

Reviewers: austin, Phyx, bgamari

Reviewed By: Phyx, bgamari

Subscribers: thomie

Differential Revision:

2 years agoExpose purgeObj in ObjLink
Jon Coens [Tue, 10 Jan 2017 19:28:54 +0000 (14:28 -0500)] 
Expose purgeObj in ObjLink

Test Plan: Rebuild GHC under 7.10.2.

Reviewers: niteria, simonmar, austin, bgamari

Reviewed By: bgamari

Subscribers: thomie

Differential Revision:

2 years agoFix typo in comment
Steffen Forkmann [Sat, 7 Jan 2017 09:39:09 +0000 (10:39 +0100)] 
Fix typo in comment

2 years agoRemove tyConString
David Feuer [Tue, 10 Jan 2017 18:41:31 +0000 (13:41 -0500)] 
Remove tyConString

`tyConString` has been deprecated since GHC 7.4. It's time for it to go.

Reviewers: austin, hvr, bgamari

Reviewed By: bgamari

Subscribers: thomie

Differential Revision:

GHC Trac Issues: #13096

2 years agoRemove deprecated InteractiveEval API
David Feuer [Tue, 10 Jan 2017 18:40:51 +0000 (13:40 -0500)] 
Remove deprecated InteractiveEval API

Remove `RunResult(..)`, `runStmt`, and `runStmtWithLocation`.  These
were all deprecated and documented as slated for removal in GHC 7.14,
which I figure means 8.2.

See cf7573b8207bbb17c58612f3345e0b17d74cfb58 for an explanation of why
this change was made.

Reviewers: simonpj, hvr, austin, bgamari

Reviewed By: bgamari

Subscribers: thomie

Differential Revision:

GHC Trac Issues: #13095

2 years agoevent manager: Don't worry if attempt to wake dead manager fails
Ben Gamari [Tue, 10 Jan 2017 18:38:50 +0000 (13:38 -0500)] 
event manager: Don't worry if attempt to wake dead manager fails

This fixes #12038, where the TimerManager would attempt to wake up a
manager that was already dead, resulting in setnumcapabilities001
occassionally failing during shutdown with unexpected output on stderr.

I'm frankly still not entirely confident in this solution but perhaps it
will help to get a few more eyes on this.

My hypothesis is that the TimerManager is racing:

  thread                   TimerManager worker
  -------                  --------------------
  requests that thread
  manager shuts down

                           begins to clean up,
                           closing eventfd

  calls wakeManager,
  which tries to write
  to closed eventfd

To prevent this `wakeManager` will need to synchronize with the
TimerManger worker to ensure that the worker doesn't clean up the
`Control` while another thread is trying to send a wakeup. However, this
would add a bit of overhead on every timer interaction, which feels
rather costly for what is really a problem only at shutdown.  Moreover,
it seems that the event manager (e.g.  `GHC.Event.Manager`) is also
afflicted by a similar race.

This patch instead simply tries to catch the write failure after it has
happened and silence it in the case that the fd has vanished. It feels
rather hacky but it seems to work.

Test Plan: Run `setnumcapabilities001` repeatedly

Reviewers: austin, hvr, simonmar

Reviewed By: simonmar

Subscribers: thomie

Differential Revision:

GHC Trac Issues: #12038

2 years agoAdd doc header to Dynamic's re-export of Typeable
Chris Martin [Tue, 10 Jan 2017 18:38:33 +0000 (13:38 -0500)] 
Add doc header to Dynamic's re-export of Typeable

Data.Data and Data.Dynamic both re-export Data.Typeable with the same
comment, though in the Data module the comment is a haddock header, and
in Typeable it is not. I assume the inconsistency was a mistake.

Reviewers: austin, hvr, bgamari

Reviewed By: bgamari

Subscribers: thomie

Differential Revision:

2 years agousers-guide: Produce OpenSearch description
Ben Gamari [Tue, 10 Jan 2017 18:38:15 +0000 (13:38 -0500)] 
users-guide: Produce OpenSearch description

Reviewers: austin, hsyl20

Reviewed By: hsyl20

Subscribers: thomie

Differential Revision:

2 years agoEnable subsections via symbols on iOS
Demi Obenour [Tue, 10 Jan 2017 18:37:47 +0000 (13:37 -0500)] 
Enable subsections via symbols on iOS

Test Plan: GHC CI

Reviewers: austin, bgamari

Reviewed By: bgamari

Subscribers: thomie

Differential Revision:

GHC Trac Issues: #11040, #13049

2 years agoCheck that type variable does not reference itself in its kind signature
John Leo [Tue, 10 Jan 2017 18:36:17 +0000 (13:36 -0500)] 
Check that type variable does not reference itself in its kind signature

This fixes #11592.

Test Plan: validate

Reviewers: simonpj, austin, bgamari, goldfire

Reviewed By: goldfire

Subscribers: thomie

Differential Revision:

GHC Trac Issues: #11592

2 years agobase: Add Foreign.ForeignPtr.plusForeignPtr.
Shea Levy [Tue, 10 Jan 2017 18:33:58 +0000 (13:33 -0500)] 
base: Add Foreign.ForeignPtr.plusForeignPtr.

Reviewers: simonmar, austin, hvr, bgamari

Reviewed By: bgamari

Subscribers: RyanGlScott, thomie

Differential Revision:

2 years agoThrow an exception on heap overflow
Demi Obenour [Tue, 10 Jan 2017 18:33:31 +0000 (13:33 -0500)] 
Throw an exception on heap overflow

This changes heap overflow to throw a HeapOverflow exception instead of
killing the process.

Test Plan: GHC CI

Reviewers: simonmar, austin, hvr, erikd, bgamari

Reviewed By: simonmar, bgamari

Subscribers: thomie

Differential Revision:

GHC Trac Issues: #1791

2 years agotestsuite: Add performance testcase from #12707
Ben Gamari [Thu, 5 Jan 2017 19:32:57 +0000 (14:32 -0500)] 
testsuite: Add performance testcase from #12707

2 years agoEnsure mkUserGuidePart is compiled with current GHC version
Ben Gamari [Sat, 7 Jan 2017 14:59:56 +0000 (09:59 -0500)] 
Ensure mkUserGuidePart is compiled with current GHC version

2 years ago-dead_strip is now the default on Darwin
Demi Obenour [Thu, 5 Jan 2017 22:06:26 +0000 (17:06 -0500)] 
-dead_strip is now the default on Darwin

This enables subsections-via-symbols (-dead_strip) by default on Darwin.
The Static Reference Table (SRT) needs to be split in order for
-dead_strip to be helpful, so this commit always splits it on Darwin

Test Plan: GHC CI on Darwin

Reviewers: erikd, austin, bgamari

Reviewed By: erikd, bgamari

Subscribers: erikd, thomie

Differential Revision:

GHC Trac Issues: #11040, #13049

2 years agoProperly detect MinTTY when running GHCi on Windows
Ryan Scott [Thu, 5 Jan 2017 22:03:19 +0000 (17:03 -0500)] 
Properly detect MinTTY when running GHCi on Windows

Before, we detecting the presence of MinTTY on Windows in a very
imprecise way: by checking if the `_` environment variable was set. Not
only is this easy to circumvent, but it also yields false positives on
terminals like ConEmu.

This changes the test to use the `GetFileInformationByHandleEx` function
instead, which provides a far more accurate check for MinTTY's presence.
I've tested this on PowerShell, MSYS2, Cygwin, ConEmu, and Git Bash, and
it does the right thing on each one.

Fixes #12958.

Test Plan: Run GHCi on many different Windows and MinTTY consoles

Reviewers: erikd, Phyx, austin, bgamari

Reviewed By: Phyx, bgamari

Subscribers: thomie, #ghc_windows_task_force

Differential Revision:

GHC Trac Issues: #12958

2 years agoCmmCommonBlockElim: Ignore CmmUnwind nodes
Ben Gamari [Thu, 5 Jan 2017 22:02:00 +0000 (17:02 -0500)] 
CmmCommonBlockElim: Ignore CmmUnwind nodes

We don't want unwind information to affect the code we produce.
Consequently we need to ensure that CBE ignores unwind nodes for the
purposes of equality.

Test Plan: Validate

Reviewers: scpmw, simonmar, austin

Reviewed By: simonmar

Subscribers: thomie

Differential Revision:

2 years agoMake HsIParamTy have a Located HsIPName
Alan Zimmerman [Tue, 10 Jan 2017 15:01:50 +0000 (17:01 +0200)] 
Make HsIParamTy have a Located HsIPName

To simplify API Annotations.

Updates haddock submodule

2 years agoTypos in comments (and in a test)
Gabor Greif [Thu, 5 Jan 2017 10:41:44 +0000 (11:41 +0100)] 
Typos in comments (and in a test)

2 years agoFix zonk_eq_types in TcCanonical
Simon Peyton Jones [Mon, 9 Jan 2017 14:58:02 +0000 (14:58 +0000)] 
Fix zonk_eq_types in TcCanonical

This fixes Trac #13083. An egregious bug.

Merge to the 8.0 branch

2 years agoParse holes as infix operators
Ömer Sinan Ağacan [Sun, 8 Jan 2017 04:52:53 +0000 (07:52 +0300)] 
Parse holes as infix operators

Reported as #13050. Since holes are expressions but not identifiers,
holes were not allowed in infix operator position. This patch introduces
a new production in infix operator parser to allow this.

Reviewers: simonpj, austin, bgamari

Reviewed By: simonpj

Subscribers: simonpj, RyanGlScott, thomie, mpickering

Differential Revision:

GHC Trac Issues: #13050

2 years agoTH: Add Trustworthy language pragma
Erik de Castro Lopo [Sat, 7 Jan 2017 21:34:30 +0000 (08:34 +1100)] 
TH: Add Trustworthy language pragma

Test Plan: validate

Reviewers: goldfire, bgamari, austin, RyanGlScott

Reviewed By: RyanGlScott

Subscribers: RyanGlScott, simonpj, thomie, goldfire

Differential Revision:

GHC Trac Issues: #12511

2 years agoHave addModFinalizer expose the local type environment.
Facundo Domínguez [Tue, 20 Dec 2016 11:39:10 +0000 (08:39 -0300)] 
Have addModFinalizer expose the local type environment.

Kind inference in ghci was interfered when renaming of type splices
introduced the HsSpliced data constructor. This patch has kind
inference skip over it.

Test Plan: ./validate

Reviewers: simonpj, rrnewton, bgamari, goldfire, austin

Subscribers: thomie, mboes

Differential Revision:

GHC Trac Issues: #12985

2 years agoRevert "Have addModFinalizer expose the local type environment."
Facundo Domínguez [Fri, 6 Jan 2017 18:08:47 +0000 (15:08 -0300)] 
Revert "Have addModFinalizer expose the local type environment."

This reverts commit e5d1ed9c8910839e109da59820ca793642961284.

2 years agoActually add the right file for T13035 stderr
Matthew Pickering [Fri, 6 Jan 2017 17:15:35 +0000 (17:15 +0000)] 
Actually add the right file for T13035 stderr

2 years agoHave addModFinalizer expose the local type environment.
Facundo Domínguez [Mon, 2 Jan 2017 22:42:20 +0000 (19:42 -0300)] 
Have addModFinalizer expose the local type environment.

Kind inference in ghci was interfered when renaming of type splices
introduced the HsSpliced data constructor. This patch has kind
inference skip over it.

Test Plan: ./validate

Reviewers: simonpj, rrnewton, austin, goldfire, bgamari

Reviewed By: goldfire, bgamari

Subscribers: thomie, mboes

Differential Revision:

GHC Trac Issues: #12985

2 years agoAdd missing stderr file for T13035
Matthew Pickering [Fri, 6 Jan 2017 17:14:30 +0000 (17:14 +0000)] 
Add missing stderr file for T13035

2 years agoMore fixes for #5654
Simon Marlow [Tue, 20 Dec 2016 14:32:11 +0000 (14:32 +0000)] 
More fixes for #5654

* In stg_ap_0_fast, if we're evaluating a thunk, the thunk might
  evaluate to a function in which case we may have to adjust its CCS.

* The interpreter has its own implementation of stg_ap_0_fast, so we
  have to do the same shenanigans with creating empty PAPs and copying
  PAPs there.

* GHCi creates Cost Centres as children of CCS_MAIN, which enterFunCCS()
  wrongly assumed to imply that they were CAFs.  Now we use the is_caf
  flag for this, which we have to correctly initialise when we create a
  Cost Centre in GHCi.

2 years agoAdd performance test for #13056
Ryan Scott [Wed, 4 Jan 2017 18:57:25 +0000 (13:57 -0500)] 
Add performance test for #13056

This performance regression was fixed by commit
517d03e41b4f5c144d1ad684539340421be2be2a (#12234). Let's add a performance test
to ensure that it doesn't break again.

2 years agoFix the implementation of the "push rules"
Simon Peyton Jones [Fri, 6 Jan 2017 09:35:37 +0000 (09:35 +0000)] 
Fix the implementation of the "push rules"

Richard pointed out (comment:12 of Trac #13025) that my
implementation of the coercion "push rules", newly added
in exprIsConAppMaybe by commit b4c3a66, wasn't quite right.

But in fact that means that the implementation of those same
rules in Simplify.simplCast was wrong too.

Hence this commit:

* Refactor the push rules so they are implemented in just
  one place (CoreSubst.pushCoArgs, pushCoTyArg, pushCoValArg)
  The code in Simplify gets simpler, which is nice.

* Fix the bug that Richard pointed out (to do with hetero-kinded

Then compiler performance worsened, which led mt do discover
two performance bugs:

* The smart constructor Coercion.mkNthCo didn't have a case
  for ForAllCos, which meant we stupidly build a complicated
  coercion where a simple one would do

* In OptCoercion there was one place where we used CoherenceCo
  (the data constructor) rather than mkCoherenceCo (the smart
  constructor), which meant that the the stupid complicated
  coercion wasn't optimised away

For reasons I don't fully understand, T5321Fun did 2% less compiler
allocation after all this, which is good.

2 years agoAvoid exponential blowup in FamInstEnv.normaliseType
Simon Peyton Jones [Thu, 5 Jan 2017 17:40:49 +0000 (17:40 +0000)] 
Avoid exponential blowup in FamInstEnv.normaliseType

Trac #13035 showed up a nasty case where we took exponentially
long to normalise a (actually rather simple) type.  Fortunately
it was easy to fix: see Note [Normalisation and type synonyms].

2 years agoUse the right in-scope set
Simon Peyton Jones [Thu, 5 Jan 2017 17:39:08 +0000 (17:39 +0000)] 
Use the right in-scope set

I tripped over these calls to substTyWith that didn't obey the
precondition about in-scope variables.  Easily fixed, happily.

2 years agoCoerce for fmapDefault and foldMapDefault
David Feuer [Thu, 5 Jan 2017 21:25:37 +0000 (16:25 -0500)] 
Coerce for fmapDefault and foldMapDefault

Define `fmapDefault = coerce traverse` and `foldMapDefault = coerce
traverse`.  This ensures that we won't get unnecessary allocation and
indirection when the arguments don't inline.

Fixes #13058

Reviewers: ekmett, RyanGlScott, austin, hvr, bgamari

Reviewed By: RyanGlScott

Subscribers: simonpj, RyanGlScott, thomie

Differential Revision:

GHC Trac Issues: #13058

2 years agoFix doctests in Data.Functor
Oleg Grenrus [Thu, 5 Jan 2017 21:25:29 +0000 (16:25 -0500)] 
Fix doctests in Data.Functor

Reviewers: austin, hvr, bgamari

Reviewed By: bgamari

Subscribers: thomie

Differential Revision:

GHC Trac Issues: #11551

2 years agoRemove single top-level section in Foldable docs
Chris Martin [Thu, 5 Jan 2017 21:25:17 +0000 (16:25 -0500)] 
Remove single top-level section in Foldable docs

This fixes a mild annoyance in the haddock output for Data.Foldable.
The section outline had a single top-level heading, which doesn't serve
any purpose as far as I can tell.

Reviewers: austin, hvr, bgamari

Reviewed By: bgamari

Subscribers: thomie

Differential Revision:

2 years agoUse atomic counter for GHC.Event.Unique
alexbiehl [Tue, 3 Jan 2017 15:59:39 +0000 (10:59 -0500)] 
Use atomic counter for GHC.Event.Unique

Reviewers: hvr, austin, bgamari

Reviewed By: bgamari

Subscribers: mpickering, thomie

Differential Revision:

2 years agoAdd a CSE pass to Stg (#9291)
Joachim Breitner [Thu, 15 Dec 2016 18:57:43 +0000 (10:57 -0800)] 
Add a CSE pass to Stg (#9291)

This CSE pass only targets data constructor applications. This is
probably the best we can do, as function calls and primitive operations
might have side-effects.

Introduces the flag -fstg-cse, enabled by default with -O for now. It
might also be a good candiate for -O2.

Differential Revision:

2 years agoEnsure nested binders have Internal Names
Simon Peyton Jones [Wed, 4 Jan 2017 17:47:13 +0000 (17:47 +0000)] 
Ensure nested binders have Internal Names

This is a long-standing bug.  A nested (non-top-level) binder
in Core should not have an External Name, like M.x. But

- Lint was not checking this invariant

- The desugarer could generate programs that failed the
  invariant.  An example is in
  tests/deSugar/should_compile/T13043, which had
     let !_ = M.scState in ...
  This desugared to
     let ds = case M.scSate of M.scState { DEFAULT -> () }
     in case ds of () -> ...

  We were wrongly re-using that scrutinee as a case binder.
  And Trac #13043 showed that could ultimately lead to two
  top-level bindings with the same closure name.  Alas!

- The desugarer had one other place (in DsUtils.mkCoreAppDs)
  that could generate bogus code

This patch fixes all three bugs, and adds a regression test.

2 years agoMinor refactoring in CSE
Simon Peyton Jones [Wed, 4 Jan 2017 13:14:30 +0000 (13:14 +0000)] 
Minor refactoring in CSE

I noticed that CSE.addBinding was always returning one of its own
inputs, so I refactored to avoid doing so.

No change in behaviour.

2 years agoRemove a redundant test
Simon Peyton Jones [Wed, 4 Jan 2017 13:09:54 +0000 (13:09 +0000)] 
Remove a redundant test

postInlineUnconditionally was testing for isExportedId, but it was
/also/ testing for top-level-ness, which is redundant.  This patch
just removes the redundant test, and documents it.

2 years agoTypofixes in manual and comments [ci skip]
Gabor Greif [Wed, 4 Jan 2017 17:37:23 +0000 (18:37 +0100)] 
Typofixes in manual and comments [ci skip]

2 years agoTypo in manual [ci skip]
Gabor Greif [Tue, 3 Jan 2017 16:45:19 +0000 (17:45 +0100)] 
Typo in manual [ci skip]

2 years agoDon't use $ in the definition of (<**>) in GHC.Base
Matthew Pickering [Tue, 3 Jan 2017 05:22:03 +0000 (00:22 -0500)] 
Don't use $ in the definition of (<**>) in GHC.Base

($) is special as Richard explains in the note at the top of the page.

However, when adding the note he didn't remove this usage. Normally it
didn't cause any problems as the optimiser optimised it away. However if
one had the propensity to stick one's fingers into the depths of the
inliner, it caused horrible idInfo panics.

Reviewers: rwbarton, hvr, austin, bgamari

Reviewed By: bgamari

Subscribers: thomie

Differential Revision:

GHC Trac Issues: #13055

2 years agoAdd specialization rules for realToFrac on Complex
Takano Akio [Tue, 3 Jan 2017 05:20:24 +0000 (00:20 -0500)] 
Add specialization rules for realToFrac on Complex

This patch implements RULES that specialize realToFrac at these 2 types:

`(Real a) => a -> Complex Double`
`(Real a) => a -> Complex Float`

Test Plan: ./validate

Reviewers: austin, hvr, bgamari

Reviewed By: bgamari

Subscribers: thomie

Differential Revision:

GHC Trac Issues: #13040

2 years agoRefactor importdecls/topdecls parsing.
Edward Z. Yang [Mon, 2 Jan 2017 22:03:42 +0000 (17:03 -0500)] 
Refactor importdecls/topdecls parsing.

Previously, we had the following parser:

    xs : xs ';' x
       | xs ';'
       | x

This is a very clever construction that handles duplicate,
leading and trailing semicolons well, but it didn't work very
well with annotations, where we wanted to attach the annotation
for a semicolon to the *previous* x in the list.  This lead
to some very disgusting code in the parser.

This commit refactors the parser into this form:

    semis1 : semis1 ';'
           | ';'
    xs_semi : xs x semis1
            | {- empty -}
    xs : xs_semi x

Now, when we parse one or more semicolons after an x, we can
attach them immediately, eliminating some very grotty annotations
swizzling that was previously in the parser.

We now need to write the top-level parser for imports and then
declarations in a slightly special way now:

    top : semis top1
    top1 : importdecls_semi topdecls_semi
         | importdecls_semi topdecls
         | importdecls

This is because the *_semi parsers always require a semicolon,
but we're allowed to omit that last newline.  So we need
special cases to handle each of the possible cases where we
may run out of semicolons. I don't know if there is a better
way to structure this, but it is not much more complicated
than what we had before for top (and asymptotically better!)

Signed-off-by: Edward Z. Yang <>
Test Plan: validate

Reviewers: simonmar, austin, alanz, bgamari

Reviewed By: alanz, bgamari

Subscribers: thomie, mpickering

Differential Revision:

2 years agoDon't suggest enabling TypeApplications when it's already enabled
Maciej Bielecki [Mon, 2 Jan 2017 22:03:00 +0000 (17:03 -0500)] 
Don't suggest enabling TypeApplications when it's already enabled

Previously when encountering EAsPat in an expression context,
TypeApplications was suggested even when already enabled. This patch
replaces the suggestion with more appropriate message.

Test Plan: validate

Reviewers: austin, bgamari, mpickering, goldfire, simonpj

Reviewed By: mpickering, goldfire, simonpj

Subscribers: simonpj, goldfire, mpickering, thomie

Differential Revision:

GHC Trac Issues: #12879

2 years agoUpdate .mailmap
Matthew Pickering [Mon, 2 Jan 2017 22:14:59 +0000 (22:14 +0000)] 
Update .mailmap

2 years agoDisallow users to write instances of KnownNat and KnownSym
sjorn3 [Mon, 2 Jan 2017 21:57:04 +0000 (21:57 +0000)] 
Disallow users to write instances of KnownNat and KnownSym

As noted in #12837, these classes are special and the user should
not be able to define their own instances.

Test Plan: Validate

Reviewers: adamgundry, goldfire, mpickering, austin, bgamari

Reviewed By: goldfire, mpickering

Subscribers: goldfire, mpickering, thomie

Differential Revision:

GHC Trac Issues: #12837

2 years agoRemove documentation about non-existent flag.
Edward Z. Yang [Mon, 2 Jan 2017 04:26:01 +0000 (20:26 -0800)] 
Remove documentation about non-existent flag.

Signed-off-by: Edward Z. Yang <>
2 years agoFix incorrect statement about plugin packages.
Edward Z. Yang [Sun, 1 Jan 2017 17:41:45 +0000 (09:41 -0800)] 
Fix incorrect statement about plugin packages.

Signed-off-by: Edward Z. Yang <>
2 years agoFix various issues with testsuite code on Windows
Tamar Christina [Wed, 28 Dec 2016 10:04:28 +0000 (10:04 +0000)] 
Fix various issues with testsuite code on Windows

Previously we would make direct calls to `diff` using `os.system`.
On Windows `os.system` is implemented using the standard
idiom `CreateProcess .. WaitForSingleObject ..`.

This again runs afoul with the `_exec` behaviour on Windows. So we ran
into some trouble where sometimes `diff` would return before it's done.

On tests which run multiple ways, such as `8086` what happens is that
we think the diff is done and continue. The next way tries to set things
up again by removing any previous directory. This would then fail with
and error saying the directory can't be removed. Which is true, because
the previous diff code/child is still running.

We shouldn't make any external calls to anything using `os.system`.
Instead just use `runCmd` which uses `timeout`. This also ensures that if
we hit the cygwin bug where diff or any other utility hangs, we kill it and
continue and not hang the entire test and leave hanging processes.

Further more we also:
Ignore error lines from `removeFile` from tools in the testsuite. This is a rather large
hammer to work around the fact that `hsc2hs` often tries to remove it's own file too early.
When this is patched the workaround can be removed. See Trac #9775

We mark `prog003` as skip. Since this test randomly fails and passes. For stability it's disabled
but it is a genuine bug which we should find. It's something with interface files being
overwritten. See Trac #11317

when `rmtree` hits a readonly file, the `onerror` handler is raised afterwards but not
during the tree walk. It doesn't allow you to recover and continue as we thought.
Instead you have to explicitly start again. This is why sometimes even though we
call `cleanup` before `os.mkdirs`, it would sometimes fail with an error that the
folder already exists. So we now do a second walk.

A new verbosity level (4) will strip the silent flags from `MAKE` invocations so you can actually
see what's going on.

Test Plan: ./validate on build bots.

Reviewers: bgamari, austin

Reviewed By: bgamari

Subscribers: mpickering, thomie, #ghc_windows_task_force

Differential Revision:

GHC Trac Issues: #12661, #11317, #9775

2 years agoBump array submodule
Ben Gamari [Mon, 26 Dec 2016 18:14:38 +0000 (13:14 -0500)] 
Bump array submodule

Fixes overflow check from fix to #229.

2 years agoTestsuite: Skip failing tests on PowerPC 64-bit
Peter Trommler [Mon, 26 Dec 2016 15:04:54 +0000 (10:04 -0500)] 
Testsuite: Skip failing tests on PowerPC 64-bit

The Power ISA says the result of a division by zero is undefined.  So
ignore stdout on PowerPC 64-bit systems.

Disable ext-interp tests on 64-bit PowerPC.  We don't have support for
PowerPC 64-bit ELF in the RTS linker, which is needed for the external

Test Plan: ./validate

Reviewers: austin, simonmar, hvr, erikd, bgamari

Reviewed By: bgamari

Subscribers: thomie

Differential Revision:

2 years agotestsuite: Fix T13025
Ben Gamari [Tue, 27 Dec 2016 17:08:24 +0000 (12:08 -0500)] 
testsuite: Fix T13025

It relied on `wc`, which produces slightly different format on OS X and Linux.
Instead use `grep -c` which appears to be supported on both platforms and
produces consistent output.

2 years agoExpand I/O CP in comments
Joachim Breitner [Tue, 27 Dec 2016 08:41:19 +0000 (09:41 +0100)] 
Expand I/O CP in comments

as suggested by @gracjan at

2 years agoCallArity: Use exprIsCheap to detect thunks
Joachim Breitner [Mon, 26 Dec 2016 09:16:55 +0000 (10:16 +0100)] 
CallArity: Use exprIsCheap to detect thunks

Originally, everything that is not in WHNF (`exprIsWHNF`) is considered
a thunk, not eta-expanded, to avoid losing any sharing. This is also how
the published papers on Call Arity describe it.

In practice, there are thunks that do a just little work, such as
pattern-matching on a variable, and the benefits of eta-expansion likely
oughtweigh the cost of doing that repeatedly. Therefore, this
implementation of Call Arity considers everything that is not cheap
(`exprIsCheap`) as a thunk.

Nofib reports -2.58% allocations for scs and -40.93% allocation for
wheel-sieve1; the latter has - 2.92% runtime.

2 years agoRemove redudant import from check-ppr
Matthew Pickering [Mon, 26 Dec 2016 16:26:49 +0000 (16:26 +0000)] 
Remove redudant import from check-ppr

2 years agocheck-ppr: Make --dump the default behavior
Ben Gamari [Mon, 26 Dec 2016 15:02:43 +0000 (10:02 -0500)] 
check-ppr: Make --dump the default behavior

2 years agorename: Add note describing #11216
Ben Gamari [Fri, 23 Dec 2016 23:09:40 +0000 (18:09 -0500)] 
rename: Add note describing #11216

2 years agoDefine MAP_ANONYMOUS on systems that only provide MAP_ANON
Gracjan Polak [Fri, 23 Dec 2016 19:37:08 +0000 (14:37 -0500)] 
Define MAP_ANONYMOUS on systems that only provide MAP_ANON

Reviewers: simonmar, erikd, austin, bgamari

Reviewed By: bgamari

Subscribers: gracjan, rwbarton, thomie

Differential Revision:

GHC Trac Issues: #13005

2 years agobase: Override Foldable.{toList,length} for NonEmpty
Artyom [Fri, 23 Dec 2016 19:36:55 +0000 (14:36 -0500)] 
base: Override Foldable.{toList,length} for NonEmpty

Previously the Foldable instance for NonEmpty used default
implementations for toList and length.

I assume that the existing implementations
(i.e. Data.List.NonEmpty.{toList,length}) are better than
the default ones, and frankly can't see a good reason why they
might be worse – but if they are, instead of this commit
we'd have to switch Data.List.NonEmpty.{toList,length}
to use Foldable.

Reviewers: austin, hvr, bgamari

Reviewed By: bgamari

Subscribers: int-index, thomie

Differential Revision:

2 years agoFix test for T12877
Sylvain Henry [Fri, 23 Dec 2016 19:36:10 +0000 (14:36 -0500)] 
Fix test for T12877

Summary: See

Reviewers: nomeata, austin, bgamari

Reviewed By: bgamari

Subscribers: thomie

Differential Revision:

2 years agoUse python3 for linters
Matthew Pickering [Fri, 23 Dec 2016 19:35:55 +0000 (14:35 -0500)] 
Use python3 for linters

We now require python3 for the testsuite so rather than require two
versions of python it makes sense to use python3 for the linters as

Reviewers: austin, bgamari

Reviewed By: bgamari

Subscribers: thomie

Differential Revision:

2 years agoAdd caret diagnostics
Phil Ruffwind [Thu, 22 Dec 2016 22:06:51 +0000 (17:06 -0500)] 
Add caret diagnostics

This is controlled by -f[no-]diagnostics-show-caret.

Example of what it looks like:
 42 |     x = 1 + ()
    |         ^^^^^^
This is appended to each diagnostic message.

Test Plan:

Reviewers: simonpj, austin, bgamari

Reviewed By: simonpj, bgamari

Subscribers: joehillen, mpickering, Phyx, simonpj, alanz, thomie

Differential Revision:

GHC Trac Issues: #8809

2 years agorename: Don't require 'fail' in non-monadic contexts
Ben Gamari [Thu, 22 Dec 2016 18:55:30 +0000 (13:55 -0500)] 
rename: Don't require 'fail' in non-monadic contexts

Fixes #11216.

2 years agousers-guide: Kill extraneous link
Ben Gamari [Thu, 22 Dec 2016 18:07:23 +0000 (13:07 -0500)] 
users-guide: Kill extraneous link

2 years agotestsuite: Split out Windows allocations numbers for T12234
Ben Gamari [Wed, 21 Dec 2016 18:37:59 +0000 (13:37 -0500)] 
testsuite: Split out Windows allocations numbers for T12234

2 years agoPush coercions in exprIsConApp_maybe
Simon Peyton Jones [Fri, 23 Dec 2016 12:59:41 +0000 (12:59 +0000)] 
Push coercions in exprIsConApp_maybe

Trac #13025 showed up the fact that exprIsConApp_maybe isn't
clever enough: it didn't push coercions through applicatins, and that
meant we weren't getting as much superclass selection as we should.

It's easy to fix, happily.

See Note [Push coercions in exprIsConApp_maybe]

2 years agoRemoved dead code in DsCCall.mk_alt
Simon Peyton Jones [Fri, 23 Dec 2016 10:43:03 +0000 (10:43 +0000)] 
Removed dead code in DsCCall.mk_alt

Fixes Trac #13029 by deleting code and adding comments

2 years agoPropagate evaluated-ness a bit more faithfully
Simon Peyton Jones [Thu, 22 Dec 2016 12:22:47 +0000 (12:22 +0000)] 
Propagate evaluated-ness a bit more faithfully

This was provoked by Trac #13027.

The fix in Simplify actually cures the reported bug; see
Note [Case binder evaluated-ness] in Simplify.

The fix in CoreTidy looks like an omission that I fixed while I
was at it.

2 years agoTiny refactor in CoreTidy
Simon Peyton Jones [Thu, 22 Dec 2016 12:20:13 +0000 (12:20 +0000)] 
Tiny refactor in CoreTidy

2 years agoFloat unboxed expressions by boxing
Simon Peyton Jones [Fri, 9 Dec 2016 00:04:00 +0000 (00:04 +0000)] 
Float unboxed expressions by boxing

This patch makes GHC's floating more robust, by allowing it
to float unboxed expressions of at least some common types.

See Note [Floating MFEs of unlifted type] in SetLevels.

This was all provoked by Trac #12603

In working this through I also made a number of other corner-case
changes in SetLevels:

* Previously we inconsistently use exprIsBottom (which checks for
  bottom) instead of exprBotStrictness_maybe (which checks for
  bottoming functions).  As well as being inconsistent it was
  simply less good.

  See Note [Bottoming floats]

* I fixed a case where were were unprofitably floating an
  expression because we thought it escaped a value lambda
  (see Note [Escaping a value lambda]).  The relevant code is
       float_me = (dest_lvl `ltMajLvl` (le_ctxt_lvl env)
                  && not float_is_lam)   -- NEW

* I made lvlFloatRhs work properly in the case where abs_vars
  is non-empty.  It wasn't wrong before, but it did some stupid
  extra floating.

2 years agoEnsure that even bottoming functions have an unfolding
Simon Peyton Jones [Fri, 23 Dec 2016 10:06:03 +0000 (10:06 +0000)] 
Ensure that even bottoming functions have an unfolding

The payload of this change is to ensure that a bottoming function
still has an unfolding, just one with an UnfoldingGuidance of

Previously it was getting an unfolding of NoUnfolding. I don't think
that was really /wrong/, but it was inconsistent with the general
principle of giving everthing an unfoding if we know it.  And it
seems tideier this way.

2 years agoComments only
Simon Peyton Jones [Fri, 23 Dec 2016 10:04:23 +0000 (10:04 +0000)] 
Comments only

2 years agoWhite space only
Simon Peyton Jones [Fri, 23 Dec 2016 10:04:02 +0000 (10:04 +0000)] 
White space only

2 years agoFix a bug in ABot handling in CoreArity
Simon Peyton Jones [Fri, 23 Dec 2016 09:33:07 +0000 (09:33 +0000)] 
Fix a bug in ABot handling in CoreArity

See Note [ABot branches: use max] in CoreArity.

I stumbled on this when investigating something else, and
opened Trac #13031 to track it.

It's very hard to tickle the bug, which is why it has lurked so long,
but the test
does so

Oddly, the testsuite framework doesn't actually run the test; I have
no idea why.

2 years agoAlpha-renaming and white space only
Simon Peyton Jones [Thu, 22 Dec 2016 13:49:35 +0000 (13:49 +0000)] 
Alpha-renaming and white space only

2 years agoAllow timeout to kill entire process tree.
Tamar Christina [Fri, 23 Dec 2016 00:56:34 +0000 (00:56 +0000)] 
Allow timeout to kill entire process tree.

we spawn the child processes with handle inheritance on. So they inherit the std handles.
The problem is that the job handle gets inherited too.
So the `JOB_OBJECT_LIMIT_KILL_ON_JOB_CLOSE` doesn't get used since there are
open handles to the job in the children.

We then terminate the top level process which is `sh` but leaves the children around.

This explicitly disallows the inheritance of the job and events handle.

Test Plan: ./validate

Reviewers: austin, bgamari

Reviewed By: bgamari

Subscribers: thomie, #ghc_windows_task_force

Differential Revision:

GHC Trac Issues: #13004

2 years agoRevert "Suppress duplicate .T files"
Gabor Greif [Thu, 22 Dec 2016 13:57:27 +0000 (14:57 +0100)] 
Revert "Suppress duplicate .T files"

This reverts commit 9a29b65bda8aed4c5fdbff25866ddf2dd1583210.

It turns out that while not harmful, that commit is unnecessary,
and a `make clean` resolved it. See:

2 years agoFix another forward reference to a Note
Ryan Scott [Thu, 22 Dec 2016 01:35:33 +0000 (20:35 -0500)] 
Fix another forward reference to a Note

A continuation of ccc918cdc8b2d147c4dbc29bfc87c058862a97cd.

[ci skip]

2 years agoNotes on parsing lists in Parser.y
Edward Z. Yang [Wed, 21 Dec 2016 07:38:20 +0000 (23:38 -0800)] 
Notes on parsing lists in Parser.y

Maybe everyone knows this but I think it is worth mentioning

Signed-off-by: Edward Z. Yang <>
Test Plan: none

Reviewers: bgamari, austin

Subscribers: thomie, mpickering

Differential Revision:

2 years agoUpdate ghc-cabal command line usage text.
Edward Z. Yang [Wed, 21 Dec 2016 06:09:16 +0000 (22:09 -0800)] 
Update ghc-cabal command line usage text.

Old usage text was horribly out-of-date.  Now updated!

Signed-off-by: Edward Z. Yang <>
Test Plan: none

Reviewers: bgamari, austin

Subscribers: thomie

Differential Revision:

2 years agoSupport for abi-depends for computing shadowing.
Edward Z. Yang [Wed, 14 Dec 2016 09:28:43 +0000 (01:28 -0800)] 
Support for abi-depends for computing shadowing.

This is a complete fix based off of
ed7af26606b3a605a4511065ca1a43b1c0f3b51d for handling
shadowing and out-of-order -package-db flags simultaneously.

The general strategy is we first put all databases together,
overriding packages as necessary.  Once this is done, we successfully
prune out broken packages, including packages which depend on a package
whose ABI differs from the ABI we need.

Our check gracefully degrades in the absence of abi-depends, as
we only check deps which are recorded in abi-depends.

Contains time and Cabal submodule update.

Signed-off-by: Edward Z. Yang <>
Test Plan: validate

Reviewers: niteria, austin, bgamari

Subscribers: thomie

Differential Revision:

GHC Trac Issues: #12485

2 years agoDisambiguate two Notes with identical names
Ryan Scott [Wed, 21 Dec 2016 16:44:04 +0000 (11:44 -0500)] 
Disambiguate two Notes with identical names

It turns out there were two Notes in the GHC codebase named
[Pattern synonym signatures]. To avoid confusion, I gave one Note a slightly
different name.

2 years agoFix a forward reference to a Note
Ryan Scott [Wed, 21 Dec 2016 16:40:06 +0000 (11:40 -0500)] 
Fix a forward reference to a Note

2 years agoImproved perf for T12227
Simon Peyton Jones [Wed, 21 Dec 2016 14:03:53 +0000 (14:03 +0000)] 
Improved perf for T12227

Improved compiler allocations by abut 5%.  It comes from one of

1a4c04b1 Fix 'SPECIALISE instance'
c48595ee Never apply worker/wrapper to DFuns
05d233e8 Move InId/OutId to CoreSyn
e07ad4db Don't eta-expand in stable unfoldings
d250d493 Add INLINE pragamas on Traversable default methods
c66dd05c Move typeSize/coercionSize into TyCoRep

I think d250d493.

But it's good anyway.

2 years agoTest Trac #12950
Simon Peyton Jones [Wed, 21 Dec 2016 12:26:12 +0000 (12:26 +0000)] 
Test Trac #12950

2 years agoFix 'SPECIALISE instance'
Simon Peyton Jones [Wed, 21 Dec 2016 12:24:41 +0000 (12:24 +0000)] 
Fix 'SPECIALISE instance'

Trac #12944 showed that the DsBinds code that implemented a
SPECIALISE pragma was inadequate if the constraints solving
added let-bindings for dictionaries.  The result was that
we ended up with an unbound dictionary in a DFunUnfolding -- and
Lint didn't even check for that!

Fixing this was not entirely straightforward

* In DsBinds.dsSpec we use a new function
  to pick off the lambda binders from the HsWapper

* dsWrapper now returns a (CoreExpr -> CoreExpr) function

* CoreUnfold.specUnfolding now takes a (CoreExpr -> CoreExpr)
  function it can use to specialise the unfolding.

On the whole the code is simpler than before.

2 years agoNever apply worker/wrapper to DFuns
Simon Peyton Jones [Wed, 21 Dec 2016 12:22:00 +0000 (12:22 +0000)] 
Never apply worker/wrapper to DFuns

While fixing Trac #12444 I found an occasion on which we applied
worker/wrapper to a DFunId.  This is bad: it destroys the magic

This patch is a minor refactoring that stops this corner case
happening, and tidies up the code a bit too.

2 years agoMove InId/OutId to CoreSyn
Simon Peyton Jones [Wed, 21 Dec 2016 12:13:11 +0000 (12:13 +0000)] 
Move InId/OutId to CoreSyn

It turned out that many different modules defined the same type
synonyms (InId, OutId, InType, OutType, etc) for the same purpose.

This patch is refactoring only: it moves all those definitions to

2 years agoLint DFunUnfoldings
Simon Peyton Jones [Mon, 19 Dec 2016 15:04:51 +0000 (15:04 +0000)] 
Lint DFunUnfoldings

Previously we simply failed to Lint these DFunUnfoldings, which led
to a very delayed error message for Trac #12944

2 years agoDon't eta-expand in stable unfoldings
Simon Peyton Jones [Wed, 21 Dec 2016 12:01:32 +0000 (12:01 +0000)] 
Don't eta-expand in stable unfoldings

See SimplUtils Note [No eta expansion in stable unfoldings],
and Trac #9509 for an excellend diagnosis by Nick Frisby