Fix StgLint bound id check, generalize StgLint
authorÖmer Sinan Ağacan <omeragacan@gmail.com>
Sat, 8 Dec 2018 04:23:10 +0000 (23:23 -0500)
committerBen Gamari <ben@smart-cactus.org>
Sat, 8 Dec 2018 04:23:29 +0000 (23:23 -0500)
commit04caa935ac22bd2bd1a254f26df9dca4ee6abdd1
treebf98fb67cdce8352fc968a3a2590a8a631394ae5
parent57c9b1ae4cafd0ee763451f2d4bc10220eef9689
Fix StgLint bound id check, generalize StgLint

StgLint was incorrectly using isLocalId for bound id check to see
whether an id is imported (in which case we don't expect it to be bound)
or local.  The problem with isLocalId is that its semantics changes
after Core, as explained in the note: (last line)

    Note [GlobalId/LocalId]
    ~~~~~~~~~~~~~~~~~~~~~~~
    A GlobalId is
      * always a constant (top-level)
      * imported, or data constructor, or primop, or record selector
      * has a Unique that is globally unique across the whole
        GHC invocation (a single invocation may compile multiple
        modules)
      * never treated as a candidate by the free-variable finder;
            it's a constant!

    A LocalId is
      * bound within an expression (lambda, case, local let(rec))
      * or defined at top level in the module being compiled
      * always treated as a candidate by the free-variable finder

    After CoreTidy, top-level LocalIds are turned into GlobalIds

We now pass current module as a parameter to StgLint, which uses it to
see if an id should be bound (defined in the current module) or not
(imported).

Other changes:

- Generalized StgLint to make it work on both StgTopBinding and
  CgStgTopBinding.
- Bring all top-level binders into scope before linting top-level
  bindings to allow uses before definitions.

TODO: We should remove the binder from local vars when checking RHSs of
non-recursive bindings.

Test Plan: This validates.

Reviewers: simonpj, bgamari, sgraf

Reviewed By: simonpj, sgraf

Subscribers: rwbarton, carter

Differential Revision: https://phabricator.haskell.org/D5370
compiler/main/HscMain.hs
compiler/simplStg/SimplStg.hs
compiler/stgSyn/StgLint.hs
compiler/stgSyn/StgSyn.hs
testsuite/mk/test.mk