GHC fails to run Setup.lhs

[Krasimir Angelov]

For some reason GHC from HEAD fails to run the following Setup.lhs:


#! /usr/bin/runghc

> import Distribution.Simple
> import Distribution.Simple.LocalBuildInfo


> main = defaultMainWithHooks defaultUserHooks{postBuild=mkVSHaskellDll}
>
> mkVSHaskellDll args verbose _ localbuildinfo = do
>   return (undefined (compiler localbuildinfo))


The error is:
c:/ghc/ghc-6.5\imports/Distribution/Simple/LocalBuildInfo.hi:
  Could not find module `Distribution.Program':
    it is not a module in the current program, or in any known package.
Cannot continue after interface file error


The problem appears only when LocalBuildInfo is included and any
definition from it is used. In this case I am using @compiler at .

Cheers,
  Krasimir