cvs commit: fptools/ghc/compiler/ghci ByteCodeGen.lhs

[Julian Seward]

sewardj     2002/01/24 08:55:05 PST

  Modified files:
    ghc/compiler/ghci    ByteCodeGen.lhs 
  Log:
  This is one of those commits where the commit message is hundreds of
  times, in bytes, larger than the fix.  If you count pixels, it's
  probably more like thousands of times larger, since the fix involves
  adding a missing apostrophe.
  
  In compiling let bindings, when filtering the free vars of each RHS
  against the supplied on-stack environment p, filter against p after it
  has been augmented with the binders in this let (viz, p'), rather than
  before.  Without this, letrec-bound binders can never "get started" in
  the environment.
  
  This fixes the HEAD crash for [(i,1) | i <- [1]].  Stable branch
  is ok since the free-var machinery works a different way there.
  
  Revision  Changes    Path
  1.64      +1 -1      fptools/ghc/compiler/ghci/ByteCodeGen.lhs