Build ghc-prim

Author: hsyl20

Makefile

@@ -215,6 +215,11 @@ _build/stage1/bin/ghc: _build/stage0/bin/ghc
 	  --ghc-options='-this-unit-id=rts' \
 	  --builddir=_build/stage1/cabal/
 
+	# generate files related to primops
+
+	gcc -E -undef -traditional -P -x c  _build/stage1/src/libraries/ghc/GHC/Builtin/primops.txt.pp > _build/stage1/src/libraries/ghc/GHC/Builtin/primops.txt
+	_build/stage0/bin/genprimopcode --make-haskell-source < _build/stage1/src/libraries/ghc/GHC/Builtin/primops.txt > _build/stage1/src/libraries/ghc-prim/GHC/Prim.hs
+	_build/stage0/bin/genprimopcode --make-haskell-wrappers < _build/stage1/src/libraries/ghc/GHC/Builtin/primops.txt >  _build/stage1/src/libraries/ghc-prim/GHC/PrimopWrappers.hs
 
 
 	HADRIAN_SETTINGS='$(HADRIAN_SETTINGS_STAGE1)' \

compiler/GHC/Unit/Finder.hs

@@ -466,13 +466,7 @@ findInstalledHomeModule fc fopts home_unit mod_name = do
           | finder_lookupHomeInterfaces fopts = (hi_dir_path, hi_exts)
           | otherwise                         = (home_path, source_exts)
    in
-
-   -- special case for GHC.Prim; we won't find it in the filesystem.
-   -- This is important only when compiling the base package (where GHC.Prim
-   -- is a home module).
-   if mod `installedModuleEq` gHC_PRIM
-         then return (InstalledFound (error "GHC.Prim ModLocation"))
-         else searchPathExts search_dirs mod exts
+   searchPathExts search_dirs mod exts
 
 -- | Prepend the working directory to the search path.
 augmentImports :: OsPath -> [OsPath] -> [OsPath]